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Note for Users in UK 
IMPORTANT 


The wires in the mains lead of this apparatus are coloured in accordance with 
the following code: 


BLUE: Neutral 
BROWN: Live 


As the colours of the wires in the mains lead of this apparatus may not 
correspond with the coloured makings identifying the terminals in your plug, 
proceed as follows: 
* The wire which is coloured BLUE must be connected to the terminal 
which is marked with the letter N or coloured BLACK. 
* The wire which is coloured BROWN must be connected to the terminal 
which is marked with the letter L or coloured RED. 


Foreword 


Congratulations on your purchase of a Sharp Personal Computer, the MZ-80K. 
An important suggestion for you is to keep this MZ-80K Basic Manual. It will! be of great use . 
to tell you what to do if anything goes wrong or you are uncertain of your operation. | 
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From Ancient Times People Have Been Fascinated by the Lights from Outer Space 


That’s why through times people would have looked at the starry sky while 
lying down at night. So also would have the lad in Greek mythology dreamt 


of lights spreading over the vistas of space. 


Then, he sailed for the Golden Fleece, aiming at a bright future. Indeed, 
Argo Navis is such a constellation clearly shining over the horizon in the 
south. This constellation is symbolized by the ship sailing with youth; the 


ship representing courage, future, search and longing. 


Just like the ship of youth, the MZ-80K will sail before long. To realize your 


dreams in such a manner, we have created this Sharp’s original mark. 
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— Trying gains Experience. 
cee A “try” is a must to start something new. In fact, your 


ko  Tirst “try” at anything requires a lot of courage, and even 
Yo) _ SO, it is difficult. You will drown, for example, if you jump 

7=N\ into the sea right after reading a book on swimming 
having trained only at home. This is because you have 
no “experience,” though you know the fact. To gain your 


~~ 
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wae “experience,” the basic study is essential to have a oe 
TOT good “try.” : 
bee Your computer is not a dangerous tool that puts you at Sales 


risk if you make a small mistake. It will become too con- 
venient for you to be without once you get used to it. 

This manual is designed to help you understand the 
essence of your computer by learning in your time. With 
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MY COMPUTER 


Here’s a new friend for you. 


The MZ-80K is ready to enjoy conversation with you. Through conversation, it will help you solve difficult 
calculation problems or become a partner to play a game with. More than that, it has unknown potentialities to 
be opened up with you. This is just like a journey into unknown space. Together with your new friend, let’s make 
the journey now. 
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Conversation requires a language. Even those with great ability will not be able to work together without any 
common language to understand each other. Similarly, a common language is crucial for understanding between a 
computer and human beings. Using such a common language, instructions can be given to a computer for its 
execution of a wide variety of jobs that are possible with the combined use of instructions. The common language 
is termed ‘“‘Computer Language’”’. Human languages are various in type, such as English, Japanese and German, for 
example. So are the computer languages according to their applications. The computer language called “BASIC” 
is widely used for microcomputers. 

BASIC is made up of easy English statements featuring the capability of generating a string of instructions for a 
computer to do the types of jobs, namely, a “‘program” in the form of conversation between a man and a 
computer. 

Of course, the type of computer language in use is at your disposal. 

For the time being, however, description proceeds based on the use of BASIC. 


The instruction codes and 
procedures must be 
memorized, 


Beginner's All-purpose Symbolic Instruction Code 
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Now, begin operating your computer. First, turn on the POWER switch on the 
back of the machine. The following will be displayed on the TV screen. 


SP-100X is the version No. of monitor, 
It changes with amended versions. 


xX MONITOR SP-100X XX 


The ™ must be flickering. This flickering Mis termed a “cursor” on which the characters or symbols representing 
a key appears when a key is depressed. The cursor shifts to the right, and is in its waiting condition for the next 
key-in. In this status, the computer is in a position to do nothing, for it has not yet memorized a common 
language to converse with you. What it can do however in this status is to memorize such a common language. 


lam a sleeping genius. | want to converse 
with you and obey your instructions to work 
hard, | don’t know what to do for you 

yet. | want to work now. 


It is too early to start, 
Mr. Computer. 


It usually takes a long time for human beings to memorize a working language, and requires a lot of effort. 
Contrary to this, the computer can do the same job quickly with simple operations. Teaching such a language to 
the computer from a cassette tape is called “‘loading’’. 
Press the keys by selecting the characters on the keyboard in the following order. 

(t] > [o] +[A] > LD) > 


if you make a miss-key operation, 


You have done it well, haven’t you? With correct key-in, the display on the TV screen is as illustrated below. 
With this, the computer is ready to receive a common language into memory. 
: Then, press the PLAY button of the tape recorder to let the 

3 computer memorize the BASIC language. 


& PLAY means the depression 
of PLAY button on the tape 
recorder, 
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A hard working driver, indeed. He has any complex 
roadways in memory to take us anywhere as 
instructed. 


If there is something 
necessary to do on 
the way, he is sure 
to call there and 

do it. 


If this shop is closed, 
1 will call at the next 
shop, and then. 


But he does not follow 
any small mistake in 
instructions. 


‘i : 


At last, BASIC is ready 


XX MONITOR SP-100K xx 
¥ LOAD 

$ PLAY 

LOADING BASIC 

X SHARP BASIC SP-Soxxx 
eeee BYTES 
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BASIC will be cleared from the 
memory if the power switch is off. 
We must be careful not to switch 

off until we have finished, 


The cursor flickering 
means that the computer 
asks you to give instruc- 
tions now,. 
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The above has made the computer memorize the BASIC, ready to execute 
your instructions. Now is the time for you to use the BASIC. That’s right, the 
time for your learning. 

With the computer before you, operate it to learn the BASIC. At the beginning, 
try a number of operations to make your learning easy. The computer will 
never be broken with any key operation. Try pressing keys, to see what the 
computer answers. If a repeated action loop occurs during operation, press 
the IBREAK]key while the SHIFT] key remains depressed. The computer stops 
and returns to its READY condition waiting for a new instruction. 
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The keyboard is a means for you to converse with the computer. The keys are separated by colours, and 
classified into two groups depending on the use, as follows: 


Black and blue keys ....... These are for keying-in of a total of 204 characters and symbols. 
YOu Meee atc cn cw ok These are for function controls. 


(1) With character and symbol keys pressed, the characters and symbols in the following coloured portions 
are displayed on the TV screen. 
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(2) While pressing the |SHIFT | key in the yellow key group, press the character and symbol keys to display 
the characters and symbols in the coloured portions below. 
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(3) While pressing the |SHIFT|key in the yellow key group, push down the |SML -:CAP|key, and the lamp 


changes from green to red. Pressing the character and symbol keys afterwards results in display of the 
characters and symbols in the following coloured portions. However, the alphabet will be displayed in small 
letters although they are illustrated here in large letters. 
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AMBER = oo 
HMNBEBRERRARE SS 2 ee 
a 
SAT) Deu) SPACE a} res) | SFT gg aC 


To display characters and symbols shown in (1) again, press the|SML - CAP}key once again. The lamp light 
14 changes from red to green to return to status (1). 
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To display $, press 
the key 
first and proceed 
this way. 


special Key Functions 


After the transfer of the instruction displayed on the TV screen to the computer, the cursor shifts 
to the head of the next line. . CR: Abbreviation of carriage return. 


The cursor shifts to the top left corner of the TV screen. 


This deletes the character at the left of the cursor, shifting characters on the right to the left by one 
character space. The right end becomes blank. DEL: delete 


The cursor shifts down by one character space. When the cursor is at the bottom end of the TV 
screen, the display is shifted up by one line. No character is cleared even if the cursor passes 
through it. 


The cursor shifts to the right by one character space. When the cursor is at the right end, the display 
shifts to the left end one line down. No character is cleared even if the cursor passes through it. 


Stops read or write operation when this key is pressed while reading or writing a cassette tape. 


With the|SHIFT|key depressed, pushing the special keys down changes their functions as follows: 


This deletes the display and the cursor shifts to the top left corner of the TV screen. However, 
the program and parameter contents remain unchanged. CLR: clear 


This inserts a blank in the cursor position, shifting the characters on the right to the right by one 
character space. INST: insert 


The cursor shifts up by one character space. Positioned at the top of the screen, however, the cursor 
remains unmoved. No character is cleared even if the cursor passes through it. 


The cursor shifts to the left by one character space. When positioned at the left end, the cursor shifts 
to the right end one line above. No character is cleared even if the cursor passes through it. 


Stops program execution. 
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Now, start on a fascinating voyage. First, let’s have a sailing ship for us to be on board. The ship is there in the 
cassette tape marked “‘APPLICATIONS”. Similar to the BASIC reading, reading should be done in the 
following procedure. Best learning is trying without hesitation. 


f 2 Like sailing, preparations 
are also necessary for the 
computer, 
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This cassette 
tape contains 
interesting 
games to play. 


wonderful! 
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Select the following keys, 


[L} [©) [A} (5) CR], and press 


them in that order. 


Display on the TV screen 
is in the same order as 
the keys were depressed. 


If you make a mistake, 


press the key and 
re-enter. How wonderful! 
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After our safe sailing off, let’s now go down to a party to celebrate 
a good start. There is a fashion show going on. SPRING FASHION IN 1900 


VV Ellice’s Fashion Show POP 


There is a fashion show going on in cabin 101. Something like music 
can be heard. Ellice, the idol of the youth aboard the ship Argo, is 
now on the stage. Since this show is on the side A of the cassette Corpecce 
tape next to the ship pattern, similarly key-in [L] [0] (D] [CRI, | 

and the tape will run. With the tape recorder set to STOP, the com- “hy 
puter askes you to press the button, and you can hold down 
the[PLAY] button. After loading, key-in [R] [U} [N] in that order 
as you did before when READY is displayed on the TV screen. 
With Ellice and music, cabin 101 is in a very happy mood. 


CK LEE 


With the JPLAY]} button Oh, the tape stops with 
READY on display on 


he TV screen. 


Bon voyage! 


READY means that all the 
preparations have been 
completed. 
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NCR) 


n, this is how conversation 
ith the computer goes on. 
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The computer has an internal clock. 


With the power switch on, this clock starts counting time up, 
instantly setting the time to 00 hours 00 minutes 00 seconds 
automatically. The OO has a meaning. The clock inside the 
computer consists of two figures each for hours, minutes and 
seconds, making a number of 6 figures. 

How many minutes have passed since the power switch on the 
computer was turned on? If it was 30 minutes ago, the number of 
6 figures must be 003000. In the same procedure as before, load 
5 the clock program to be described below. 

i” The cassette tape restarts and stops, then the computer displays 
READY on the TV screen to indicate that loading has been 
completed. Then, set the internal clock to the actual time of your 
watch. For example, when your watch shows 10 hours 35 
minutes 12 seconds A.M. set the internal clock at 10 hours 36 
minutes A.M.. This requires the following keying in operation: With 


(T} [CS] [=] [129] [0] [3] [6] [0] [0] 


keyed-in, press the[CR] key simultaneously with the actual time of 
10 hours 36 minutes when it comes, and the internal clock is set. 
All you do after this is RUN. 


In the cabin 102, happy sailors enjoy a take-down game. 
Now, let’s start loading this program. How? The procedure is 
the same as we have done before. The rules of this game are 
simple: 


* You and the computer take a stone or more alternately 
from a pile of stones. 


* The pile becomes smaller in size, and the last stone is taken 
to win the game. 


Have vou finished program loading? 
Now, key-in RUN to start the game. 
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[R] IN] . Don't forget to press the key. 


Now is your turn to think. You will lose this game unless you think. 


eee TAKE-DOWN GAME eee 


@@HOW TO PLAY THE TAKE-DOWN GAME Qs 


YOU AND I ALTERNATELY TAKE A STONE OR 
MORE FROM A PILE OF STONES, 

THE FILE BECOMES SMALLER IN SIZ2E,AND THE 
LAST STONE IS TAKEN TO WIN THE GAME. 

THE NUMBER OF FILES If WITHIN &, 


HOW MANY FILES ARE TAKEN # 


The computer will ask a question 
of how many piles are made. 
To make 3, for example, key-in 


[3] . The number of piles 


e¢8 TAKE-DOWN GAME @68 


tO ££ eevseee 
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DO YOU TAKE THE 
YES(Y) OR NO(N) ? 


The computer will then ask a 
question of who will take the first 
move. To take the first, key-in 


. To take the second move, 


7 


(Se 


a 


can be assigned from 1 to 8. key-in [NJ[CR] . 
The computer then asks if the Now, key-in to take the 
number of piles is correct. If answer first move. 


is yes, key-in LY, . If answer 


is no, key-in IN|[CR] and re-enter 
number of piles. 
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ae8 TAKE-DOWN GAME #86 


nm § eeesoee 
(i § evseee 
cA § seenesee 
m § eeseses 
~) § eeeoeeeee 
x7 8 eeseoesee 


Start the game! 

The 8 mountains are now on display. 
The computer will ask a question of 
which pile is taken from. For example, 
answer to the question. 
When asked how many stones are 
taken, key-in the number of stones 

to be taken. For example, when your 
answer is , you take 2 stones 
from the 8nd pile. 


Ce ee er 


What are the Computer Functions Described so far Based On? 
What is there on the Cassette Tape?..... 

This is the sea you have sailed to; The World of BASIC Programs. 
Separate programs are generated for inclusive use in the game and 


the clock. Here, let’s have a look at what a program is like. Press 
the keys, as shown below: 


[L] [1] [S$] [7] [eR] 


What has been displayed on the TV screen is the program for the 
take-down game. Your ship is now turning slowing to head straight 
for its destination. 

That's right!..... Your destination is to generate or modify a program 
by yourself. 
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Using the computer like an electronic calculator is 
possible if required. This kind of operation is called 
“Direct Mode”. 

Like the electronic calculator, key-in 5 + 8=. 

To key-in the [+], press the key while holding down 
the key. 

In fact, however, the computer displays the char- 
acters on the TV screen only as keyed-in, and of 
course, no calculation is executed even with the 

key depressed. Here lies the difference between your 
computer and the electronic calculator. Your com- 
puter requires an instruction of what should be done 
about 5 + 8 =. 


25 pence for bread and 35 
pence for cream. Adding 
them up, let me see, 
makes 60 pence. 


Even a great 
mathematician can 
do calculation. 

So does the com- 
puter, of course. 
However, the com- 
puter is entirely 
different from an 
electronic calculator. 


Do these 
problems. 


tt és 


Teacher, ‘‘Do’’ means “delete”, “copy” 
“calculate” or ‘write the calculation results’’? 
There is no way to do them unless they are 

specified, Teacher. For | can do many things. 


PRINT 


To use the computer in the same manner as the electronic calculator, the computation of 5 + 8 is required to be 
displayed on the TV screen. For this, there is the PRINT command available as an instruction. Using this 
command, let’s press the keys in the following order to transfer the instructions. 


[P} (A) 11) inj ir] [5] [+] [8] [er 


As the keys are depressed, the characters below will be displayed on the TV screen. 
How about your computer? 


Ee 6 6c heehee SS e ee RU EH © Es RES ee Be) ket Oe we Meaning ‘Go ahead with your work’”’. 
Pel B72 cuweecen ceo eed das eee ak FeSO eee eeee bee ES Display the computation of 5 + 8, and 
with the key. Pressed indicating the end of a command. 

Oh cx ea ie ds 6s eer a ERE AD eee eos This is the executed result of the command. 
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Why not do more calculations using the PRINT command?.....Calculations of a number of many figures, repeated 
additions, and subtraction as well..... 

If you want to go on to multiplication and division, note that the computer uses signs slightly different from 
those of ordinary mathematics. 


Calculation with Parenthesis 


The computer is capable of handling more complex calculations than an ordinary caiculator. This is a calculation 
with parenthesis. 
In case of ordinary mathematical operation, different signs of groupings are used to write as follows: 

3x6x (6+3x{9—-2 x (4—2)+1} ] 
Whereas the parenthesis ( _) alone is used at all times with the computer. 

3X6 (6 +3x(9 — 2 X(4 — 2) + 1)) 
Even with the above, the computer never forgets the rule that computation in the inner signs of groupings be 
done first, and never makes any mistake. 


The parentheses may be used no 
matter how many. However, the 
number of open parentheses and 
close parentheses must be 

identical, or an error will occu 


For multiplication, writing as 
4 (3-2) is wrong, so be sure to 
write 4 X (3-2). 


Exercise 
PRINT (6+ 4) / (6 — 4) 


5 
PRINT 3X(5+9X(9 —2)—6/(4—2))+5 Try a lot of 

200 calculations. 
PRINT (3+ 4)x(5 +6) 3(s-4{3- cork, 

17 S~ 962 [¢349)-{s 
PRINT (10+ 20) /6x(2 + 3) 

25 


PRINT (10 +20) / (6x(2 + 3)) 
1 


= - 


OR RIES SNSSUNSEKNSK RSS RSS KROL OOL LCOS IOSD Se ERE 


oS y) Sj ASO ASAIO OES OES sox) XSeXXSOX) vy 

COR IT tre Oe ett Ti © Soe Ronee eee 
MASA Se WER NRK So) X SEK OA MER BER OS OS ROO ISSA SSK ASSUNSOMNSEN SOK ROK RSS KK SS 

(eS VCS VYo RAO OANA DMA LALA SOKMSEXKSOKNS KK SEK NSS KKES HOSW OSH LOSOS ASO ADA 

SSWSSHNE RSENS SIRS RSS RSNA OS OS NSRNESNSS) 


As is clear from the above, the characters or symbols put between quotation marks ” are displayed as they are on 
the TV screen. 
The block of characters and/or symbols between the quotation marks is called a string. 


PRINT “345” PRINT 345 


It is necessary for you to Know more about the strings. The free use of strings will double the pleasure in operating 
the computer. 


Oh, really? 
Y She does not notice that 


he is talking about the string. 


PRINT “| LOVE YOU”. 


PRINT YS 


This is the command which you will have to get along with quite 
often. If you think it troublesome to key-in PRINT at every 
operation, 

press the ? in place of PRINT. 

The computer automatically converts the ? to PRINT. 


The BASIC is a feeling. 
if you think PRINT 

command, why don’t you 
try using the ?. 


73 5 

15 

? (3+ 4) X10 
70 


Sox 


-is possible to add a plurality of items, such as strings and equations, to the PRINT command. In this case, 
dividual items should be separated using semicolons and commas. 


PRINT “3+5 ="; 3+5 


ato= 8 


he equation between the quotation marks is a string. 
he actual calculation is done according to the equa- 
on following the semicoion. 

ry it. 

fhat will happen when using a comma (,) in place of 
semicolon (;)? 


PRINT “3+5=", 345 
3+5= \ 


hy! The result of 3+5 is displayed far away from 
1e equation. This means the following difference lies 
etween the semicolon and comma. 


a eae Display is made next to the equation. 
See Display is made 10 character space 
away from the equation. 


PRINT “3T5=", 3+51¢CR 
3+5= / 


K-10 character spae| 


8 


10 character space 
away. This one 
character space 

is the position 

for the sign of 
plus, or minus 

of the 8. 


PRINT “3-5=',3-5(CR] 


3-S= 
K+410 character space-—>| 


2 


In case of a plus 
sign, the + sign is 
omitted according 
to mathematical 
practice. 


PRINT “3—5="5 3-5 [CR] 


C ee ae 


fhen a separation is made with a comma, the 6 character space is not away from the end position of a string, but 
0 character space from the starting position of the string. This fact requires your special attention. 


PRINT ‘'12345”, 3+5 
12345 8 
a 


10 character space 


PRINT “123456789”, 3+5 
123456 789 8 
————— 


10 character space 


f the string is longer than 10 character space, the figure 8 is automatically made a further 10 character space 


way. 


PRINT ‘123456789012’, 3+5 
123456789012 8 


20 character space 
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The program 
execution begins 


This program requires no special explanation, does it? 
This program is the one to instruct calculations of A=3 
and B=5, and the display of A, B and C on the TV 
screen in equation as follows: 


C=A+B 


The numeral at the head of each statement is called a statement number. The computer is sure to execute the 
statement numbers from small in value to large in the correct sequence. Therefore, this makes it possible to 
insert a new statement in the program afterwards. For example, 

35 D=B-—C 
The computer executes a program in the sequence of the statement numbers, and therefore, the statement 
numbers are made in steps of 10, as illustrated in the above example, so that new statements can be inserted later 
whenever required. The statement numbers can be selected at liberty from 1 to 65,535. 


Oh, | forgot the 
statement in 


i ing, 
For example, presuming the following statement number 


35 [CR] 


the statement in statement number 35 is deleted from 
the computer. 


Now, !et’s execute the program. 
Press the keys as follows RUN ; 


For your own experience, 
RUN key-in the calculation 
for the value of A, B,C, 


‘ 8 being number of 2 or 
«—— 10 character space——» «___ 10 character space —-; , = more digits, and the 
calculation for 


the value with 
minus (—) 


(7? \) sign. 
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While continuing conversation with the computer by Please display O.K., | will display all 
repeated trials and errors, the first keyed-in program may all the programs that | was taught. 
sometimes be gone from the TV screen. Even so, don’t b SSGUNE gem, 
worry. The computer never forgets any program once 
keyed-in. When you want to see the previous keyed-in 
program, key-in the following: 

LIST 
This is followed by the display of all the stored programs on 
the TV screen. If the program extends over tens and 
hundreds of lines beyond display at a time, part of the 
stored programs can be displayed. 


The result of NEW....... 


To store a new program, clear the previous program using 
the NEW command. Otherwise, two programs may overlap 
to cause confusion. 

NEw |cR] 
This will clear the previous program completely. To ensure 
this, key-in the LIST command to check that the program 
is cleared. 


10 A= 3 
$e NeW 
30 C=AtB 


40 PRINTA,B,C 
So END 


| will modify 
statement numbers 
from 10 to 30, but 
it is troublesome 
to do so, one by 
one, 


Oh, that was a big 
mistake! | should 
not have cleared 

them, 


Anyway, { will 
give thought to 
them after 

clearing. 
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What is a SYNTAX 
ERROR? 


This ts the same program as used before. Did it run well? 
If there is an error in any statement, the computer tells you 
about it. For example, 


50 EMD 


mp 


yy 


TS ES nA ae, 


If you make a mistake of M for N, the computer executes 
the program up to statement number 40 as instructed, but 
it does not know what EMD is all about. The computer tells 
you about a syntax error, as follows: 


| mean a grammatical error in instructions. 
Like the English language, use the grammar 
understandable to me, or | cannot 

understand it. 


SYNTAX ERROR IN 50 


Then, key-in correctly as 50 END. For two statements identical in statement number, if any, the computer takes 


up the one that was keyed-in later. With this, is your program complete? 
If so, try to make a mistake in statement number 20, for example. 


20 5=B 


With this, the statement in statement number 20 must be revised. 
Sure?.,...Use the LIST command to check the revision. 


This is a symbol 


representing a space. 


20 B=At+55 


20 ~B=AtT55 | : 
20 18-55 Na WY Ke 
Die 


Bi 

Y/ Any space 
Oh, something funny occurs. Statement number 20 is not revised. On top of XY is igre 
that, a strange statement with statement number 205 lists out. This results 
because the computer ignored a space (blank part) between 20 and 5 and 


arranged them as a statement number. A space to the computer is entirely in- Execution is made 


ar ; in a same manner for 
significant and ignored. all sharaaters.or 
symbols. 


Note : See page 114 for detailed information of errors. 
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you want to do the following about your program which has been stored in the computer: 


To correct errors, 

To modify for a better statement, 

To modify for a separate statement, 

To modify part of a complete statement to generate a new statement, 


et’s study about statement modification, insertion and deletion when the above are required. 


(3) Press the |CURSOR)| key 5 times. 


When the cursor is shifted to position 5, 
press the [7] key. 


jursor Shift 


9 revise the characters in a statement, the cursor 
ust be shifted to the respective character positions. 
ow, let’s revise 5 of the statement B = 5 in statement 
imber 20 to 7. Refer to the diagram at right for the 
ift procedure. 

ith this, the program displayed on the TV screen 
is been modified. In fact, however, this has not yet 
odified the program stored in the computer. To 
odify the stored contents, the key must be 
essed. What? Did you key-in 6 instead of 7? 
9 modify the character to the left of the cursor, 
ere are two methods available. 


“enue With the 

key pressed, 
revising has been 

3 completed. 


TE 


The cursor is then 
positioned at 
statement number 
qa «30. 


First, the cursor is here 
at this position. 
Shift the cursor to 
position 5 of statement 
number 20. 


While pushing the 
key four times. 


28 


2) 
‘S. 
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Character Insertion 


To modify the program on page 26 for the statement 
in statement number 30, as follows, 


30 D=100+A+B 


shift the cursor to character A. Then press the keys as 
shown below. 

With the key depressed, press the 
key 4 times. 

There must be a space for just 4 characters to add 
100 +. Key-in 100 + to this space. No more descrip- 
tion is required for the revision of C to D. Since the 
statement has been modified so far, why not modify 
the statement number from 30 to 35, and press the 
CR key. Modify statement number 40 as shown 
below. 


40 PRINT A,B,C, D 
Then type RUN 


RUN 
3 5 8 108 


Character Deletion 


35 D=100+A+B 


Let’s modify this statement. To modify it to the 
following, 


35 D=A+B+C 


Shift the cursor to character A and press the 


INST- DEL} key 4 times. This shifts the cursor unti! 


A +B portion comes right next to mark =, 


RUN 
3 5 8 16 
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20 B=5 


3[5| [D=100 +A+B 
40 PRINT A,B Dj 


So END 


Portions in the 
squares have been 
modified. 


This has cleared the statement 
in statement number 30 
on the TV screen. 


Just to make sure, 
type in LIST. 

Oh, statement 
number 30 still 
remains there. 


10 A=3 
20 B=5 

30 C=AtB 

35 D=100tAt+B 
40 PRINTA,BC,D 
SO END 


This is because no 
command was given to 


AY delete statement 
(Be number 30. 
« )b = 
} If you wish to delete it, 
wD wo refer back to page 24. 
ZN 
f h 7 
Don't forget the’ < te 
key for ESR 
modification. C5 
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You remember this, don’t you? In other words, when 
using commas between A, B and C, a numeral is 
displayed 10 character space away. Generate a pro- 
gram with new statements inserted, and run it. 
Statements to be inserted are the following: 


RUN 
3 5 8 
125 15 1.6666667 


With the comma (,) revised to semicolon ({:) for 
statement numbers 40 and 45, run the program once 
more. To modify the program, type in LIST and use 
the cursor in as smart a manner as possible. 


RUN 


358] 
125 15%1.6666667 


semicolon {;) has a function that combines the 
characters or symbols on display together. Add 
semicolon (;) to the end of statement number 40 then 
RUN, in order to make sure of this fact. 


40 PRINT A;B;C; 
RUN 
35 8 125 15 1.6666667 
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The following is replaced for statement number 40... 
40 PRINTA 
44 PRINTB 
4.9 PRINT C 


RUN niitie 
3 ay attention to the vertical column. 
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Add a comma (,) 
or semicolon (;) 
to the ends of 
statement numbers 
40 and 41, 


There is the 
difference between 
,and ;. 


ee 28 7s 


RINT'{ 23", 456°) 
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In case of astring its contents 
are displayed, irrespective of 
plus and minus signs. 
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I’m acolon, and that’s why you 
are a perfect stranger even 
though you live next door to me. 


This program consists of short statements. A program 
in this length can be processed under one statement 
number, if required. 


and stick close to them. 
100A=3:B=5:C=A+B:D=BTA:E=BXA:F=B/A: PRINT 
A;B;C: PRINT D,E,F: END 
RUN 100 


Colon (:) is a symbol to be used when more than 2 statements are inserted in one statement number. 
This kind of statement is called a “multi-statement’’. A statement with 2 lines can be described in one 
statement number. 1 line consists of 40 characters, making it possible to use 76 characters including 
a statement number. 


With ordinary RUN, execution 
starts at the smallest 
statement number. 


With RUN100, 
execution starts at 
statement number 


With END, execution 
stops at that position. 


How Much Left’ ...... SIZE 


It is natural for you to desire to know how much 
storage capacity is left at your disposal as programs 
are stored in the computer one after another. 

For this, the following is done: 


PRINT SIZE 


In response to this, the computer tells you about the 
remaining storage capacity in bytes. 


| cannot tell you unless you key-in 
the PRINT SIZE correctly. 


x x 
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Now, let’s give attention to the = sign we have often 
used so far. Try the following execution. 


1 and 3 are on display. A = A+2 is for statement 
number 30. If this is an equation, A is subtracted 
from both expressions making O=2, resulting in 
a contradiction. It is not an equation. 

Sign = means that the result of the right expression is 
substituted by symbol A prepared on the left 
expression. 


No, No, the “result” of the 
calculation is put in the box. 


Miss A, | give you 
a flower. 


How many 
flowers do you 


| give you two 

flowers. 
ACY 
)-& 


How many flowers 
do you have? 


n statement number 10, value 1 is substituted by symbol A, and at the right expression of statement 
umber 30, the value in symbol! A and 2 are added and substituted by symbol A using symbol =. 

t this time, value 1 previously put in A does not exist any more. 

he following 2 programs produce different results which proves that ‘“A=B’’ does not equal ““B=A”. 


10 A=5 
20 B=7 
30 PRINT A,B 


40 A=B 
50 PRINT A,B 
60 END CV 
RUN / 
SY 
7 7 


10 A=5 

20 B=7 

30 PRINT A,B 
40 B=A 

50 PRINT A,B 
60 END 

RUN 

5 7 
5 5 
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he prince of a star takes accurate observation of the 
arth. ‘‘The earth is a blue planet over there in the 
olar System. Though slightly distorted, the earth is @ 
pproximately 13,000 kilometers in diameter. From 
rbit calculation, its mass is about 6 x 101° thousand 
ons.”’ 

he prince went to his computer to generate the 
ollowing program for calculations of volume VE, 
urface area SE and mean density ZE of the earth. 


10 DE = 13000 €= Substitute the earth’s diameter for variable DE. 

20 WE = 6E + 18 € Substitute the earth’s mass for variable WE. 

30 SE=4 Xz X(DE/2)t2 ¢ This substitutes the surface area for variable SE. 
40 VE=4X_ X(DE/2)t3/3 @ This substitutes the earth’s volume for variable VE. 
50 ZE = WE/VE X (1E—2) = This substitutes the mean density for variable ZE. 


60 PRINT “EARTH DIAMETER”: PRINT DE;” KILOMETERS” : PRINT 

70 PRINT “EARTH SURFACE AREA”: PRINT SE;” SQUARE KILOMETER” : PRINT 
80 PRINT “EARTH VOLUME”: PRINT VE;” CUBIC KILOMETER” : PRINT 

90 PRINT “EARTH MASS”: PRINT WE;” THOUSAND TONS” : PRINT 

100 PRINT “EARTH MEAN DENSITY”: PRINT ZE;’ KILOGRAM/CUBIC METER” 
110 END 


[he prince of a start noticed that the size of the earth has slightly changed. Pay much attention to the units used 
n the calculations. Further attention is focused on the sequence of calculations when the arithmetic expression 
contains, K , + or fT. The operation priority is shown below: 


Line up in the 
order of priority. 


The expressions below are complex in combination. Do you see any difference between the expressions? 


2+372=11 | ane 
(2+3)f2=25 12/(3 K2) =2 
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The sum of the interior angles of a triangle is 180°. With a flash of inspiration, Archimedes sat on the road and 
drew a triangle. There came a mysterious soldier with his spear pointing at Archimedes. 


Soldier: Archinedes, your life is finished. Be prepared to die ! 
Archimedes: Wait a minute, | will finish this calculation. 


Soldier: What? Angle A is 30° and angle B is a right angle. 
It’s easy to determine angle C. 60°. If side CA length is known, side AB and BC lengths or even 
the area of the triangle can be easily determined. 
Archimedes: Don’t be silly. 
Soldier: All that needed is to generate a BASIC program. Let me see, Oh, Yes, it’s good with CA = 12. 
10 A=30:B=90:CA=12 
20 AB=CAXCOS (A X 2/180) 
30 BC = CAXSIN (A X2/180) 
40 S=AB XBC/2 
50 C=180—A-B 
60 PRINT “AB =” ; AB, “BC =" ;BC, "CA=";CA 
70 PRINT “AREA S=";5S 
80 PRINT “A=";A,"B=" ;B,"C=";C 


90 END 
Be prepared | 4 2 | 
to die. rs : After this it’s simple if a program 
a calculation. a is generated using Basic} 
Ea; 3 : 


Pay attention to statement numbers Incredible! 

20 and 30. What are you? 
The angle unit is converted from the 

degree to a radian. 


Using the inverse tangent ATN, let's determine the size of angle C from the side AB and BC lengths known. This 
requires the following to be keyed-in. 


50 C=ATN (AB/BC) X 180/7 


The result is in the unit of degree. The same result is obtained, isn’t it? 
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SGN (0) =0 


—T 


— 


SGN (—3.3) 


—1 if X is Jess 


EXP (1) = 2.7182818 


EXP (0) = 1 


Exponent function 


2.7182818) 


(e= 


LOG (3) = 0.47712126 


Common logarithms 


lOgio X 
Provided X is 


LN (3) = 1.0986123 


greater than 0. 


loge X 


Natural logarithms 


Provided X is 
greater than 0. 


Roots 


Less than O 


] 


SOR (0) 


Provided X is 


greater than or 
equal to 0. 


not calculated 
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Various functions have been described, and here is an explanation of DEF FN defined as a new function 
combining such various functions. Some definition examples are listed below: 


DEF FNA(X)=2X*Xt2+3XX+1... 2X? +3X+1 is defined as FNA (X). 
DEF FNB (X) =SIN (X) t2+COS(X)T2 ... sin? X + cos? is defined as FNB (X) this is always 1. 
DEF FNE(V)=1/2XMxXVTt2........ 1/2MV? is defined as FNE (V). 


DEF represents ‘‘define’’. New functions are named with FN suffixed. X or V in the parenthesis is called the 
argument. For example, the third function (seems to be motion energy) is used. 


10 DEF FNE (V)=1/2XMxVvVt2 

20 M=5.5:V=3.5 

30 PRINT FNE (V), FNE (V X 2), FNE (V X 3) 
40 END 


Motion energy at intial velocity V and motion energy with velocity doubled or tripled are displayed. DEF FN 
command is very convenient particularly when the same functions are often used in a long program. 


Fall from an altitude of 10,000 meters! 

How do you think the velocity and altitude of a fall from 
an altitude of 10,000 meters changes per second ? 
Function FNV (T) in the program is the fall velocity after 
a lapse of time T, and FNH (T) is the altitude at the same 
time. 

Acceleration of gravity G, atomospheric resistance factor 
K and altitude H when a fall occurs are assigned by 
statement number 20. 


10 ? “@" :T=0 

20 G=9.8: K=0.15: H = 10000 
30 DEF FNV (T) = G/KX(1 — EXP (—1XKxXT)) 
40 DEF FNH (T) =H — FNV (T)XT 

50? “i” 

60 PRINT “TIME ":T : MUSIC “’T~| AO” 4 Instruction with beep to be explained on page 84. 
70 PRINT “VELOCITY” ; FNV (T) 
80 PRINT “ALTITUDE” ; FNH (T) 
90 T=T+1: GOTO 50 


€ This is a shift instruction for the program to be shifted to 
statement No, 50. See page 40. 
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To inform the computer of variables’ values, we have 
. ’ Let me see, 5 would be 
so far taken the method where the value is first all right. Now I give you 


‘ é Let me know the 
determined, as follows: an input. 


value of variable 


There are several methods available for informing the 
computer of the values of variables. One of them 
uses a command called INPUT. 


10 INPUT A,B,C 
20 D=A+B+C 
30 PRINT A,B,C, D 


The sequence of 


40 END values the computer 
will ask about is in 
RUN the order of how the 


variables are arranged. 


? 


This is new display, isn’t it? ? Mis making an in- 
quiry to you about the value of first variable A 
following the INPUT command. in response to this 
inquiry, key-in the value and press the key to 


if you make a mistake 
in response to the 
question, just prese 


INST 
P — key. The 
inform the computer that everything is O.K. M8) peL | SY 
answer is O.K., and 
Look ! The same display is there. This is the inquiry then press the 


key to confirm to 


about the value of the second variable B. If there are 
‘that effect. 


3 variables, the computer asks question 3 times. If 
you reply using any key other than 0 to 9 by mistake, 
_ and press the {CR} key, the following is displayed. 


DATA ERROR 


The computer will then make inquiries about the values all over again. 


Rast 


10 INPUT “A=?" :-A 


10 INPUT A,B,C, D 

20 INPUT E,F,G,H 20 INPUT "B=?" ;B 

30 PRINT H,G,F,E 30 INPUT “C=?” ;C 

40 PRINT D,C,B,A 40 S=A+B+C 

50 END 50 M=S/3 —_ 
60 PRINT “TOTAL” ;S, “MEAN” ;M 
70 END 


With INPUT, the display of a 
string is possible. In this case, a 


Pay attention to the INPUT 
and PRINT sequences that 
semicolon must be used to 
separate them. 


have been reversed. 
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On a sunny Sunday, a gentleman and a lady sit face to face in a nice coffee shop. He is 43 years old, and she is 22 
years old. 


Gentleman: | love you at first sight. Can you marry me ? 
Lady: Yes, if you love me so much. | don’t care about the age difference. But not now. You have to wait 


until my age is half of yours. 


Presume his age is A, hers is B and the number of years she asked him to wait is X. After X years, he is A + X 
years while she is B + X. Since her age is then half of his, the condition of A + X = 2 (B + X) is required. To 
solve the equation for X, the following is obtained. 


X=A—2B. 


10 PRINT “WHAT IS HIS AGE ?” 
20 INPUT A 

30 PRINT “WHAT IS HER AGE ?” 
40 INPUT B 

50 X=A-2xXB 

60 PRINT “WAIT” ; X :” YEARS!” 
70 END 

RUN 

WHAT IS HIS AGE ? 

? 43 

WHAT IS HER AGE ? 

? 22 

WAIT-— 1 YEARS ! 


It is impossible to wait for —1 year. In other words, they could have been married a year ago. Asked suddenly 
about a question, the computer may be confused at what variable you are talking about. In this program, a string 
indicating inquiry contents is inserted in statement numbers 10 and 30. The string for an answer is also used in 


statement number 60. 
The INPUT method in this program can be simplified. Modify statement numbers 10 and 30 as described below, 


deleting statement numbers 20 and 40 from the program. 


10 INPUT “WHAT IS HIS AGE? ";A 
30 INPUT “WHAT IS HER AGE? ”";B 


Those that follow statement number 50 are identical 
to the above program. 


RUN 
WHAT IS HIS AGE? 43 
WHAT IS HER AGE? 22 
WAIT —1 YEARS! 
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READ 


This program picks up values which are then used for 


calculation. 
Two types of commands, READ and DATA, are used 


in this method. 


READ A,B,C,D 


LVN 


DATA 35, 6, —8, 7+5 


However, DATA X or 
DATA 3XY containing 
variables is impossible. 


Values and expressions using values 
can be used after DATA. 


It is unexpectedly easy to generate programs to determine rectangular, circle and triangle areas using the READ 
and DATA commands. 


A Rectangle 


ae 


= 
4 


There seems to be room for improvements in the program. ——_ D 


Try various ways yourself. 
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For programs described so far, the computer executes 
them in the correct sequence from small to large 

statement numbers. In fact, however, execution en ala go 
requires the sequence to be changed on some 


occasions. On such occasions, GOTO statements are G0TO20 = 


very effective. Tre | ere } 


sit 
i f 


‘. 1 -. EN 
" (407 WW bey 
1 We4 7 | ES , “ee 
20 PRINT N e “eee we 
30 N=N+1 zn . a 
40 GOTO 20 yt < 
50 END /\ ; ovate Wen n= go me ee 
we | wa a Pe 
1 : = Ye ay, = AAT 
2 ee es a Agee 


Not stopped? ..... Press the |[SHIFT| key, then |BREAK| key to stop. 


One upon a time, the great Knight Sir Lancelot of the Lake did a great deed for King Arthur of Camelot. King 
Arthur was so greatful to Sir Lancelot he said, ‘’I would like to give you any prize you care to ask for”. 

Sir Lancelot replied ‘““Thank you my Lord, | would like to have | Ginea today, 2 Gineas tomorrow, 4 Gineas on 
the 3rd day, 8 Gineas on the 4th day and so on until the 30th day”’. 

King Arthur was so surprised by such a small request that he agreed immediatly. 

Let us make the program below to find out how much King Arthur must pay. 


10 D=1:F=1:S=1 
20 PRINT “DAYS”, “DAY TOTAL”, “TOTAL” 
30 PRINT D,F,S 


be a So eer This is for adding oneday to each day. 
SO FeZzeP sseertexves This is for multiplying oneday’s total by two. 
6G S=S¢P ..n me innd aa This shows the total by adding to previous day total 
70 IF D=31 THEN 90 .. See page 40. 
80 GOTO 30— NOTE 
90 END 
RUN 
DAYS DAY TOTAL TOTAL 
1 1 1 
2 2 3. 
10 512 1023 
20 524288 1048575 
30 .53687091E +09 —_—. 10737418E +10 


On the 10th day he was given 1023 Gineas, on the 20th day he was given 1048575 on the 30th day he asked for 
about 1000000000 Gineas. 


Y 
SN 


SH 
MA >. 
SSX 


SER 
oe 
Vy 


w 
we 


Ss 
ae 
ww 


SSH) 
XS) 


>< AAS CA/ 
Genes 
SSNS) 

(XSo 

ee 


Ys 
oi 
M 
Si 
cu 


SS) 
SY 
Wee 
XXS2) 
(OSYX 
Yes) 
AWN, 


VS? 
Xk 
a 
e 


Ne 
Ww 
ee 
(Se) 
CAe<\ 


FEMALE 


V 
we 


ve 
(Se) 
wy 
ws 


Tr 
& 
oo 
15 
=a 
(ore) 
— 
OO 
Ow 
oo 
Ow 


Vy A > 
BES Ogeez 
SOXXS) LW oO 
ae pe 
Ar 


“less than” expressions using equal sign and unequal sign. 
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10 PRINT “ f” 

20 PRINT “INSERT OPTIONAL FIGURE FROM 1 TO 9.” 
25 PRINT “INSERT O WHEN YOU STOP.” 

30 L=0: M=0: N=0 

40 INPUT A 

50 IF A=0 THEN 90 

60 IF A<=3 THEN L=L+1:GOTO 40 

70 IF A<=6 THEN M=M+1: GOTO 40 

80 N=N+1: GOTO 40 

90 PRINT “YOU INSERTED FIGURES FROM 1 TO 3”;L;“ TIMES” ; 
100 PRINT “ FROM 4 TO 6”;M;”" TIMES "; 

110 PRINT “AND FROM 7 TO 9”";N; ” TIMES” 

120 END 


' A new symbol is used in statement number 10. Display of is possible when Void key is pressed, with 


the|SHIFT/key depressed, between quotation marks. 
This command will clear all the characters on the TV 
screen and shift the cursor to the top left corner of 


the TV screen. 


| go home while 
cleaning. 


R 
In addition, when the tre E key alone is pressed 


between quotation marks, symbol appears. 

This symbol functions only to shift the cursor to the 
top left corner. 

If these are not clear, check with PRINT “{@” or 


PRINT “(i)”. 
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| don’t like cleaning, 
and go straight home. 
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IF can select Even numbers 


Let’s consider a program for selecting even numbers only, out of many numerals, using IF... .GOTO statement. 
IF has great ability to select numbers. 


10 READ X: IF X =-—9999 THEN STOP 
20 IF X/2<> INT (X/2) GOTO 10 

30 PRINT X; : GOTO 10 

40 DATA 2, 13, 56, 55, 4, 78, 31 

50 DATA 6, 22, 15, 19, 80, 11, —9999 
RUN 

2 56 4 78 6 22 80 


INT (X/2) in statement number 20 is the statement for picking integers alone. You remember that, don’t you ? 
Therefore, if X is even, X/2 <> INT (X/2) is impossible, with execution advancing to statement number 30. 
If it is possible, it’s regarded as odd, reading the next value. 

To test your progress, let’s try an exercise. How can you decide the multiple of 3 or 4? You've got it, haven't 
you ? The answer is this. 


Modification for the multiple of three. .... 
20 IF X/3<> INT (X/3) GOTO 10 

Modification for the multiple of four..... 
20 IF X/4<> INT (X/4) GOTO 10 


IF can select Maximum and Minimum 


10 $=999: L = —999 

20 READ X: IF X =—9999 THEN 80 
30 IF X >L THEN L=X 

40 IF X>S THEN S =X 

50 GOTO 20 

60 DATA 2, —5, 91, 256, —43 

70 DATA 87, 321, —76, —9999 

80 PRINT. “MAXIMUM VALUE =";L 
90 PRINT “MINIMUM VALUE=";S 
100 END 

RUN 

MAXIMUM VALUE = 321 

MINIMUM VALUE =-—76 


Statement number 10 is very important. Put as large a number as possible in variable S for substitution of the 
minimum value, and as small a number as possible in variable L for substitution of the maximum value. What 
about the execution results ? Variable L and S come out as true maximum and minimum values. This is a good 
example of the use of IF..... THEN. 
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r The greatest common divisor (GCD) is a password for two integers. For example, presuming that two numbers 
| are 10 and 20, divisible numbers for 10 and 20 are four numbers that are 1, 2, 5 and 10. Of these numbers, the 
maximum value, namely, 10 is the greatest common divisor for numbers 10 and 20. 

Now, let’s generate a program. 


a 
. 10 PRINT “X", “Y”, “PASSWORD” 
j 20 READ X, Y 
30 PRINT X, Y, 
40 Q= INT (X/Y) 
50 R=X-QXY 
60 X=Y:Y=R 
70 IF R>O THEN 40 
80 PRINT X:GOTO 20 
90 DATA 63, 99, 1221, 121, 64, 658 
100 DATA 12345678, 87654321 
110 END 

RUN 


What is the 
Password ? 


Exposure of a Trick for this Program ! 
Long ago, a Greek mathematician, Euclid, developed this method of solution. 


Using IF....., try as many as possible. 
10 IF SGN (X) —1 THEN ? “MINUS” 
20 IF SGN (X) 0 THEN ? “ZERO” 
30 IF SGN (X) 1 THEN ? “PLUS” 
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The FOR. ... NEXT statement is an instruction used for repetition of a sequence of program statements. 
Let’s have a look at a simple program, first. | 


10 FOR N= 1 7T0 5 


The last value 


20 PRINT N; fN wail 
O was 2, an 
30 NEXT N displayed 2. What will be 
40 END next ? 
RUN 
_2.34°3 


The execution of this statement is illustrated as follows: 


If we had instructions, we could 
have let him work for us. 


The variation of N is not only increased by 1, but can be increased, for example, by 0.5 or decreased by 2. The 
variation at this time is assigned by the word of STEP. 


To increase in 0.5 increments: 
10 FOR N=1 TO 5 STEP 0.5 
To decrease in 2 decrements: 


10 FOR N=5 TO 1 STEP —2 


The general form of FOR..... NEXT statement is as follows: 
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Alice is doing her homework. She is preparing a 
multiplication table using the computer, and a 
program which contains double FOR..... NEXT 
statements. 


1 TO 9 
20 FOR Y=1T09 
30 PRINT X XY; Loop Y 
40 NEXT Y aa aa 
50 PRINT 
60 NEXT X 


Inthe FOR..... NEXT loop for variable X, the FOR..... NEXT loop for variable Y is included. Variables 
and Y vary from 1 to 9, respectively, and 1 is substituted for variable X to execute variable Y loop. !n othe 
words, with variable X remaining at 1, variable Y varies 1,2, 3,..... to 9, and each time, the multiplicatio 
product with variable X is displayed at statement number 30. When variable Y reaches 9, a line feed is execute 
at statement number 50, and at statement number 60, variable X is then 2. 


The FOR..... NEXT loop can be used double, triple, etc, up to 15. What must be observed, however, is tha 
loops are never crossed and no jump into the loop by means of GOTO is allowed. 


Insertion from outside into 


the loop is not allowed. 


FOR A=7 To3 
FOR B=1 To 5 
FOR cC=1 TO 7 


YY Pe Se ee 
9) 


NEXT C 
NEXT B 


NEXT A 


NEXT can be collected into one. 
However, NEXT A, B, C, will not work. 


y doo7z 
8 do07 


Thus, loop C is completely included in loop B, while loop B is completely included in loop A. As shown on the 
right, one word NEXT can be used for all three loops. 
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» 
> 


i 


-in, the computer can arrange them in numerical order. This is a 


With 4 numericals selected at random and keyed 


program for such a function. Use the INPUT command. 


10 PRINT “ fi” 


PRINT 


20 PRINT “TELL ME VALUES OF 4 NUMERALS” : 


NPUT A,B,C, D 


=K 


F A<=B THEN K=A:A=B:B 


FB< 
FCc< 


=B:B=C:C=K 


C THEN K 


=K 


D THEN K=C:C=D:D 


F A<B GOTO 40 
F B<C GOTO 40 


F A<C GOTO 40 


30 
40 
50 
60 
70 
80 
90 


100 PRINT A,B,C, D 


>: PRINT 


“ONCE MORE PLEASE” 


110 PRINT : PRINT 
120 GOTO 30 


the job is being 


r 


Give attention to statement number 40. Using another variable K, after the THEN statement 


done by changing the values of A and B. 


5 in the initnal state; 


3 and B = 


lf A= 


| brought a vacant box. 


We are going to 


5 is placed in A 


Oh. Good. 


temporarily. 


3 in K is shifted 


to B. That's all. 
3 are obtained. Similar processing is executed at statment numbers 50 and 60. 


Statement numbers 70 through 90 are propared for the repetition of the changing job. 


5 and B = 


By the above job, A 


ads 


2 ee a ee a 


RXXSoKKss 


i, 2 NSA 
Remmnns 


PSKXES KOSH 


Now, let’s generate a program that picks up positive integers from 1 to 20 to meet the Pythagorean theorem 
A? =B? +C?. 


| 


Using the blue keys, try to draw a 
fine triangle on the TV screeen. 
Don’t forget quotation marks 
after drawing. 


10 PRINT “@”’ 
20 PRINT ” x” 
30 PRINT “ 
40 PRINT ” B | NA" 
| 
| 


50 PRINT ” 
60 PRINT ” 
70 PRINT ” 
80 PRINT ” Gc” 
90 PRINT : PRINT “POSITIVE INTEGERS TO MEET PYTHAGOREAN THEOREM” 
110 PRINT : PRINT “EQ A”, ” EJB”, “EXC” 

120 FOR A=1 TO 20 

130 FOR B=1 TO 20 

140 FOR C=1 TO 20 

150 IF AX A—B X*B~CxC=0O THEN PRINT A,B,C 

160 NEXT C,B,A 

180 END 


You already know the meaning of statement number 10. Try to draw carefully so that a fine triangle is formed 
between statement numbers 20 through 80. At statement numbers 120 through 160, the FOR..... NEXT 
loop is triple. The equation shown at statement number 150 is repeated 8000 times (20 x 20 x 20) with C from 
1 to 20 at A = 1 and B = 1, and with C from 1 to 20 at A = 1 and B = 2, and soon. 

This operation requires a considerable period of time for its completion. 


How many times does 
he have to turn the 

pedals in order to rotate 
point A through one 
complete revolution. 
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XXSOXXSS YY SOS, cond 


It is possible to assign where to start writing the « . 
characters or symbols of a string on the TV screen. DO nia ray bB\ 
The TAB ( _) is used to do so. | | | 


Using PRINT TAB (8) ; “ABC”, string ABC is dis- 
played at the number in the parenthesis counted 
from the left hand side, namely, starting at the 9th 
position, PRINT TAB (8) ; ‘“‘ABC” starts at 8 +1. 
The numbers to be assigned for the parenthesis are 
from 0 to 78, and variables may be used if defined as 
numerals. 


Let’s operate an example of a simple program combined with the FOR ... NEXT statements. 


10 FOR X=1 TO 20 10 FOR Y=1 TO 20 
20 PRINT TAB (X) ;" x” 20 PRINT TAB (20—Y);" XK” 
30 NEXT X 30 NEXT Y 


Now, let’s try a little more complex program. 


10 PRINT “ fj" : PRINT SPC (8) ; 

20 FOR X=1 TO 22:PRINT” XX ;: NEXT X: PRINT 

30 FOR Y=1 TO 20 

40 PRINT TAB (8); x"; TAB (29 — Y) ;"“M” ; TAB (29); kK ‘'": NEXT Y : PRINT SPC (8) ; 
50 FOR Z=1 TO 22: PRINT” X ";:NEXT 2 


A new statement is there at statement numbers 10 and 40. When this SPC (__) is substituted for TAB, exactly 
same result is obtained. However, there is the difference shown below between the SPC and TAB. 


No characters are 
cleared even if the 
cursor passes through 


ao ee we ee ee a em em 
“we 2 2 ow 
ao” - 


° 
a 
” « 
% 
~ 


aRaHA @X@KR 
QO |] 2 3 4 5 6 TF 8 
SPC (8) displays space (blank) for 8 character space. 


eS 
[— 


- = 


¢ 
A 


The characters are al! cleared when 


the cursor passes through them. 


SS ae am gk. ame) aa 
-_- -~ 


a RS: SSUXSSKKSSY) Q 


: 
mes 


<2 
~ 


SOAKSS XS SKNSSIASSAXSSS 


;Sase 45 (< 
a on. We 
RESKNSSKXSOKK ORK SOPOT BOT KOD Sos 
DPMS OSV OSVV OSV OS VYosy 
NOSWKSS VES WKS LVeESWVOSYVOS YESSY YOSSI PAPO PO BOARS AI><KAPo< XS SAXSOXS ISOS XA SOX Soh 


Challenge of a Car Race ...... 


How about the simplest car race program ? 


10 X = 33 X RND (1)<q¢———_] This instruction generates random numbers. 
20 FOR A=1 TO 5 (Refer to page 70.) 
30 READ M$ 

40 PRINT TAB (0) ;“ @” ; TAB (X) ; M$; 

50 PRINT TAB (37) ;"“¢ ” 

60 NEXT A 

70 Y= 10XRND (1) 

80 FOR A=1 TO Y 

90 PRINT TAB (0) ;"@”"; 

100 PRINT TAB (37) ;“ 0" : NEXT 

110 RESTORE : GOTO 10 

120 DATA” (4b) ”, “ (oleae) ” 

130 DATA” Sse” ” (eo ieoie) ” 

140 DATA” NHR ” 


SHOP OHS HS OOOOH OSHOCOOO 
PROS SSSESHHESSSHSOSSOSHSSOOSOSM 


TAB (X) at statement number 40 determines where to display automobiles on the road, particularly from the left 
side, What distance between the automobiles ? For this, random numbers from 1 to 9 are generated at statement 
number 70, and at statement numbers 80 through 100, automobiles are controlled so that they do not collide. 
By the way, RESTORE at statement number 110 is not a familiar command, is it ? 


RESTORE Returns to the Start of Data 


No matter where it may be, or no matter how it may be scattered, DATA statement is read by READ statement. 


O. K. NO 
10 dbdtch ling 10 READ AA, B 
20 READ*A, B, C 20 READ [c 
30 DATA 107 30 DATA‘27, 10,9 
| 40 READ D 
50 DATA 9Q, 13 50 END 
60 READ De’ 
70 END 
Why No ? Because variable D has no value of DATA to be read. 
Then what about this ? 
10 READ 7A, B 
20 READ fe, 
30 DATA‘27;10, 9 
35 RESTORE RESTORE statement enables the reading of the first data in the 
40 READ D first DATA statement of the program. 
50 END 


50 


rT VT SOKKSOXK 


MSeKKSe 
Koss 


XKKXesyyesyyes s 


ANSOXX 


sXy 


The computer should generate a language under- 
standable to human beings and should talk tous... . 
To make such a desire come true, string variables are 


absolutely necessary. 


This is a string variable, 


10 A$=“MIKE” : BS = “PAUL” 

20 C$ =“TONY” : DS =’’PETE” 

30 E$ =“DENIS” : F$ = “MARTIN” 
40 G$ = “PHILIP” 

50 1$ =“JACK” : J$ = “HARRY” 


60 K$ =“BILL” : L$ =“DAVID” j 
yj in boxes with $ added 


to the variable, the variable 


Y 
Ordinary variable symbols with $ (dollar sign) suf- jj | 2, th 
Processing, very AB becomes a string instead of a 


fixed are called string variables. 
PS numeral. 


similar to that of ordinary variables is possible. 
Let’s look at some examples to see their characteris- 

Numerals in the box 
are also strings. 


70 PRINT BS q 


tics. 


80 PRINT A$ 

RUN 

PAUL 

MIKE One box can accommodate 
255 characters at maximum, 


Using “ ;’’, connects string variables. 


100 PRINT B$ ;C$; A$ ;E$ ; L$; DS ; KS 


RUN 
PAULTONYMIKEDENISDAVIDPETEBILL 


What will happen if “’, ’’ is used in place of *‘;’’ ? 


Handling strings is 
very similar to that of 
ordinary variables. 


120 PRINT B$, A$, I$ 


RUN 
PAUL MIKE JACK 
= a_i 

fi 


. Let's try one. 


To combine string variables to generate a new string, add string variables together using “ + ” 


140 X$ =B$+ C$ +A$ +D$ + JS +G$ 

150 Y$=A$+C$+BS+ FS +1$ +G$ Addition of 
160 PRINT X$ string variables 
170 PRINT Y$ \ is possible. 


With this, a new string variable is possible. 


KXSoxX 


(SOXX 


SSUNSSHNESNK: 
QOS NES HES Xx 


AXSSANSSKY 
( 


Combine string variables and INPUT statement in a program to 
create a poem. 


10 INPUT A$, BS, C$ 
20 PRINT A$ ; "4" ; BS ;“4" ;C$ 
30 GOTO 10 (Space for syllable 
? A FROG JUMPS 
? INTO A POND 

? WITH A SPLASH OF WATER. 


A FROG JUMPS INTO A POND WITH A SPLASH O 


F WATER. 


Using INPUT statement, the input of a string can be 
keyed-in, requring no quotation marks“ =” 


Another example of this is shown below. 


10 PRINT “TYPE IN ANYTHING AT ALL” 
20 INPUT AA$ 


30 PRINT “YOU HAVE JUST TYPED ” ; AAS 
40 GOTO 10 , 


10 READ X1$, X2$ 


20 PRINT X1$;“LIKE CREAM ” ; X2$ 
30 DATA DO YOU ,CAKES ? 
RUN 


DO YOU LIKE CREAM CAKES ? 


Note that quotation marks are not required when READ 
statement is used. 


pel 
XX 


(2S\ PARKES, 


WS 


SKS KK 
SSXXSSKN 
SKXSSLNSS) 
SSKXSSKRSSKNSS 


XXSS 


String variables, when combined with READ and DATA statements, can be generated into a program. 


Space between strings 
is a common character. 


DATA DO,YOU., CAKES. ? 
(me GEE 


\ 


<> 


SV 
S) 


WY, 


LoS 


) are statements to generate new strings by taking out part of 


), MID $ ( ) and RIGHT $ ( 


LEFT $ ( 
strings. 


10 A$= “AQUARIUS PISCES ARIES LEO” 


LEFTS$ (A$, 15) 


30 PRINT BS 


20 BS 


7B 
9 
be 


RUN 
AQUARIUS PISCES 


LEFT $ (A$, 15) selects the characters up to the 15th out of the string A$ in order to generate a new string. The 


string variable B$ has been defined for the new string. 


) is used. 


To select some characters when counted from the right hand side of a string, RIGHT $ ( 


40 C$ 


cts the last 9 char 


RIGHT $ (A$, 9) (Select: 


50 PRINT C$ 


RUN 
ARIES LEO 


) is used. 


To select some characters in the centre of a string, MID$ ( 


, 10, 12) — 


MIDS (A$ 


60 D$ 


70 PRINT D$ 


RUN 


PISCES ARIES 


PISCES ARIES LEO 


AQUARIUS 


PISCES 


AQUARIUS 


LEO 


ARIES 


ARIES 


PISCES 


TYOSTY 
FER 


nN 
Kg 


> 
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LEN ( ) is used to discover the character count of 
‘a string. A simple example of this statement is as 
follows: 


10 A$ = “ABCDEFG” 
20 PRINT LEN (A$) 
RUN 

7 


The character count of a string variable A$, namely 
““7T"" is displayed. 
Here is a program using LEN ({ ) statement for 
drawing a square, 


10 PRINT “f”: PRINT “ TYPE HORIZONTAL SIDE USING * KEY” 
20 INPUT A$ 

30 FOR J=1 TO LEN (A$) —2 

40 PRINT TAB (2) ;“ x ’ ; SPC (LEN (A$) — 2) 5" x” 

50 NEXT J 

60 PRINT TAB (2) ;A$: GOTO 20 


Vary the values of * INPUT. The computer performs square drawing by using LEN ( ). Then, drawing is 


made possible by characters or symbols other than “‘ x ’’. Using LEFT$ ( }, statement numbers 20 and 40 
of the previous program are modified. 


20 INPUT A$ : AA$ = LEFT $ (AS, 1) 
40 PRINT TAB (2) ; AA$ ; SPC (LEN (A$) — 2) ; AAS 


The use of LEN makes a string parade possible. 


10 S$ = “SHARP BASIC” 10 S$="“SHARP BASIC’ 
20 FOR M=1 TO LEN (S$) 20 FOR M=1 TO LEN (S$) 
30 PRINT LEFTS (S$, M) 30 PRINT RIGHTS (S$, M) 
40 NEXT M 40 NEXT M 

RUN RUN 

S es 

SH iC 

SHA SIC 

SHAR ASIC 

SHARP BASIC 

SHARP BASIC 

SHARP B P BASIC 

SHARP BA RP BASIC 

SHARP BAS ARP BASIC 

SHARP BASI HARP BASIC 

SHARP BASIC SHARP BASIC 
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ASC 


10 PRINT ASC (“A "); 
20 PRINT ASC (“ ABC ”); 
30 T$ = ‘'Z" : PRINT ASC (T$) 
40 END 
RUN 
65 65 90 
READY 


With strings in the parenthesis ( ) of ASC, when 
PRINT is keyed-in the result always shows numerals. 
Actually, this shows the ASCII code. All characters 
used with the computer are based on the ASCII code. 
For its table, refer to page 121. ASC (+) picks up 
the ASCII code for the first character of string in the 
parentnesis ( ). This gives a clear clue to the 
reason why the same result is obtained although the 
strings in the parentheses differ between statement 
numbers 10 and 20. The ASCII code is for characters 
up to 255. 


CHR$ 


{f characters can be converted to the ASCII code, it is natural that there is a statement to reverse the conversion. 
That's right. CHR$ statement does that job. 


PRINT CHR$ (65), CHR$ (ASC (“' K ’’)) 
A K 
READY 


89 on the ASCII code is Y, 
therefore, let me see.... 


A cipher is generated using the numerals. Let CHR$ 
read it. 


10 FOR J=1 TO 24: READ A 

20 BS = CHR$ (A) 

30 PRINT B$ ;: NEXT : END 

40 DATA 73, 196, 83, 84, 85, 68 

50 DATA 89, 196, 66, 65, 83, 73 

60 DATA 67, 196, 79, 70, 196, 77 

70 DATA 90, 45, 56, 48, 75, 46 

RUN 

| -STUDY — BASIC — OF — MZ — 80K. 
READY 
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This program reads an integer of an optional figure under the INPUT statement, and writes it adding commas 
(,) to every 3 figures from the right. Given 0 as an integer, the program terminates. 


10 PRINT “INPUT INTEGER ”; When 2/3 can be divided exactly 
20 INPUT X$ then 2/3 is equal to INT (Z/3) 
30 IF X$="0% THEN END 

40 PRINT “£"; 

50 FOR Y=1 TO LEN (X$) 

60 PRINT MIDS (X$, Y, 1) ; 

70 Z=LEN (X$) — Y 

80 IF 2/3 <> INT (2/3) GOTO 110 
90 IF Z=0 GOTO 110 

100 PRINT “,”; 

110 NEXT Y 

120 PRINT : PRINT: GOTO 10 
RUN 

INPUT INTEGER? 123456789 
£ 123,456,789 


INPUT INTEGER ? 1234 
£ 1,234 


Stament number 80 checks to see if Z (Character position counted from the right) is a multiple of 3. If so, a 


é 


comma “ , ’ is placed at statement number 100. For example, presuming that the input integer is a number of 9 
figures, the following is obtained. 


INPUT integer : 


“Y¥ variable”: 4) 


Take a number consisting of figures 1 to 4, and another number of the same figures but with a reverse arrange- 
ment to the former, then add up these two numbers. You will thus find that the sum is the same whether — 
it is counted from the right or from the left. 


10 PRINT “(ENTER SOME NUMBER COMPOSED OF FIGURES 1 TO 4 (WITHIN 8 DIGITS)” 
20 Z$="" : INPUT X$ 

30 FOR K=LEN (X$) TO 1 STEP —1 

40 Y$ = MID$ (X$, K, 1) 

50 Z$=Z$+ Y$: NEXT K: X= VAL (X$) + VAL (Z$) 

60 PRINT X;:PRINT : GOTO 20 
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£ 10,000 is deposited in a bank, and one year later, £ 10,600 is drawn. Interest rate, in this case, is found to be 
| 600/1000 = 0.06 or 6%. Then, what is the interest when deposited for 2 years. There are two methods available 
, for interest calculation. One is simple interest calculation based on the fact that the interest of £ 600 for the first 
year doubles for the second year, amounting to £1200. The other is compound interest calculation based on the 
idea that a deposit at the beginning of the second year is £ 10,600 with interest of £ 636 (£10,600 x 0.06) added 
to make £ 1236 for two years. Compound interest calaculation is slightly better in interest rate. For a larger sum 
of money deposited for longer terms, the difference in interest rate between the two methods must be noticeable. 
The following is the equation for determining interest included for the n year in each calculation method. 

Interest included by simple calculation (n year with rate R) 


On the new years day, | borrowed £ 10 
at 10% compound interest rate a day. 


B=X (principal) + n*X°R 
Interest included by compound calculation (n year with rate R) 


C=X-+ (1+R)? 


Based on the above equations, the following program 
is generated to calculate interest included both in 
simple and compound interests. 


10 PRINT “PRINCIPAL” | completely forgot to pay back, and | 


20 INPUT X was pressed for payment at the end 
30 PRINT “INTEREST RATE %” of the year. 
40 INPUT R 


50 PRINT “NUMBER OF YEARS” 

60 INPUT Y : PRINT : PRINT 

70 PRINT “PRINCIPAL =“ ; X 

80 PRINT “INTEREST RATE=";R;"°%” 
90 PRINT “YEARS”; TAB (6) ; “SIMPLE” ; 
100 PRINT TAB (17) ; “COMPOUND”; 

110 PRINT TAB (30) ; “DIFFERENCE” 

120 FOR A=1 TO Y 

130 B=X+AxXX x (R/100) 

140 C=INT (10 * X x (1+ R/100) f A)/10 
150 D=C—B 

160 PRINT A; TAB (6) ;B; 

170 PRINT TAB (15) ;C ; TAB (30) ;D 

180 NEXT A 

190 PRINT : PRINT : GOTO 10 


Using the computer, | calculated 
how much | had to pay back, It 
says £. 12833056E + 17, a rough 
total of £ 1300 trillion. 


The following is an example of program execution: 


PRINCIPAL = 10000 
INTEREST RATE = 6% 


Where can | get that sum ? 
| hate a computer ! 


YEARS SIMPLE | COMPOUND DIFFERENCE 
1 10600 10600 0 
2 11200 11236 36 } 
3 11800 11910.1 110.1 
4 12400 12624.7 224.7 
5 13000 13382.2 382.2 
6 13600  14185.1 585.1 
7 14200 —-15036.3 836.29999 
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In the previous example, we looked at the difference in interest between the simple and compound interest 
calculations for money deposited. Actually, however, monthly deposit, like fixed deposit, is more familiar to us. 
If a fixed amount of money X is deposited monthly, the interest included increases with X (1 + R) for the first 
year, X (1 + R)* for the second and so on. In addition, when sum X is deposited yearly, the money to be de- 
posited the year after, 2 years from now, will be X (1 +R). Such an increase of deposits is shown below in 
equations: 


Interest included a year after (Principal X and interest R) 
M, =X (1+ R) 


Interest included 2 years after 
M, = X (1+ R)? +X (1 +R) 


Interest included 3 years after 


M3, =X (1+ R)? +X (1 +R)? +X (1+R) 


Based on the above, the interest included is calculated in the following equation for n years. 
My=X(1+R)"+ X(1+R)9 14K (TER) 


This is simplified as foliows: 


My=X ((1+R)"* 1 (1 +R) Y/R 


Here’s the program generated to indicate what is the interest included for any desired year with the same amount 
of money deposited each year. Even though the same amount is deposited, this program is designed to allow 
inputs of minimum and maximum amounts. 


10 PRINT “INTEREST RATE %” ; The Result of Program Execution 
20 INPUT R 

30 PRINT “ENTER AMOUNTS” 

40 PRINT “MINIMUM” :: INPUT L 

50 PRINT “MAXIMUM” :: INPUT H 

60 PRINT “NUMBER OF YEARS”: | 

70 INPUT Y : PRINT : PRINT 

80 PRINT “RATE” :R:"%" 

90 PRINT “EACH YEAR”: TAB (12); Y ; “YEARS” 
100 R= R/100 : PRINT 

110 FOR A=L TO H STEP 10000 

120 B= INT (AX*((1+R) t (Y +1) — (1 +R)) /R) 
130 PRINT A: TAB (12):B INTEREST RATE “? & 
140 NEXT A 

150 PRINT : PRINT : GOTO 10 
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In any program, jobs in the same procedure are | will just GUSUB 

repeated. Such jobs are summarized as a sub-program Fospns iii. RETURN soon. 
which can jump anytime, anywhere whenever requir- 
ed by the main program. This sub-program is called a 
subroutine’, for which the GOSUB statement is 
used. The following isanexample ofaprogram using $f  } does ; 
the GOSUB statement. 


10 PRINT “fj” 
20 PRINT TAB (10) ;““*x * TOTAL SALES * *: PRINT 
30 PRINT “ 5 10 15 20 25 30 3 5" 


40 PRINT eee aa” 
50 PRINT “| J FLOUR ”: GOSUB 200 

60 PRINT "| J SUGER ” : GOSUB 200 

70 PRINT “ (J WINE“ : GOSUB 200 

80 PRINT “| |} SAUCE” : GOSUB 200 

110 PRINT "J" 

120 PRINT : END 

200 PRINT “' J} ;: READ A 

210 FOR N=1 TO A:PRINT “#8 >: NEXT N 
220 PRINT A 

230 RETURN 

240 DATA 20, 15, 21, 24 


In the above program, subroutines are statement numbers 200 through 230. By the RETURN statement at the 
end of subroutines, the program execution returns to the main program. 
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The computer does not always work as desired when operated with a program generated. This requires a STOP 
statement to be inserted to check the contents of variables at the stop position. For example, in the following 
program, the STOP statement is inserted. 


10 READ A,B 
20 X=A XB 
30 STOP 
40 Y =A/B 
50 END 
60 PRINT X, Y 
70 DATA 15, 5 
80 END 

RUN 

BREAK IN 30 


At this time, the display of variables is made in direct 
mode as follows: 


PRINT A, B, X 


This enables you to check the program. To re-start 
the program, give a command to the computer as 
follows: 


CONT 


The computer restarts execution from the stop position. With the END statement at statement number 50, the 
computer displays the READY and stops again. Then, print in the direct mode, as follows: 


X=3:Y=5 [CR| 


The computer will then continue program execution when the CONT command is given, displaying 3 and 5 for 
variables X and Y. 


The following program continues to display a triangle of * marks, indefinitely. 


10 A=0:B=38:C=1 

20 FOR X=A TO B STEP C 
30 FOR Y=0 TO X 

40 PRINT ” XX"; 

50 NEXT Y: PRINT: NEXT X 
60 K=A:A=B:B=K 

70 C=-—C: GOTO 20 


With the key pressed while holding down 
the [SHIFT | key, program execution stops. Then, 
insert the following in the program and give the 
CONT command. 


O.K., 
Go ahead. 


100 END 
This is followed by the display below. 
CONT ERROR 


The CONT command cannot be used when a program is edited using a statement number after program execution 


has been stopped with the STOP statement, END statement or BREAK] key operation. This requires special 
attention. 
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You have learnt much about the GOTO statement. Description here is given of theON..... GOTO statement, 
an extended function of the GOTO statement. 
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This value is 1. 
This value is 2. 


This value is 3. 


mm wee ei ea 


For example, when the value of a variable or equation after ON is 3, a jump is effected to the third statement 
number that follows GOTO. In other words, it is possible to assign the branch of a program in accordance with 
the values of variables. 


10 INPUT “NUMBER (1—3) 2?” ;A 
20 ON A GOTO 50, 60, 70 

50 PRINT “XXX":GOTO 10 
60 PRINT “YY Y":GOTO 10 
70 PRINT “Z22":GOTO 10 
RUN 

NUMBER (1-3) ? 1 
XXX 

NUMBER (1-3) ? 2 
¥Y ¥ 

NUMBER (1—3) ? @ 


Let’s play a joker-pick game using the ON ... .GOTO 
statement. A joker is included in 5 cards. The place 
of the joker is unknown, of course. Guess where the 
joker is to compete with the computer for a win. 
When asked ‘’Do you pass? ” in the program, key-in 1 
for pass, 2 for not pass and 3 if the game is no to be 
played. Three passes are allowed. 


10 R=INT(5*RND(1))+1 <=(Re 

20 N=N+#1:1F N=6 THEN 120 

30 INPUT “DO YOU PASS ? “; X 

40 ON X GOTO 60, 90, 50 

50 PRINT “GAME NOT PLAYED !!!: GOTO 120 

60 NP=NP+1 

70 IF NP>=4 THEN NP=NP—1:N=N-1: PRINT” NO PASS ALLOWED ” 

80 GOTO 20 

90 NR=NR+1 

100 IF R=NR+NP THEN PRINT “LUCKY ! YOU HAVE SELECTED THE JOKER”: GOTO 120 
110 PRINT “UNLUCKY ! YOU HAVE NOT SELECTED THE JOKER”: GOTO 20 
120 END 
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re vee ee 
Value 2: @ 
Value 3: 


To statement To statement 
No. Y No. Z 


Statement No. X 
Pi es gba oo eee ae Subroutine 
RETURN 
GOSUB and ON GOSUB are usable in 


multiple manner. 


Statement No. Y 


ae ee tee. ee ere Subroutine 
RETURN 


10 ON X GOSUB~ 100, 200 


ON Y GOSUB 300, 400 
Statement No, Z 7 
See s+ « 6 6 Be "SO Su brou ti ne 


RETURN 00, 600 


With this RETURN command, program 
execution returns to the line next to the 
_, ray GOSUB statement. 

Attention to this fact ! 


Now, let’s consider the program for a time table to check your progress. Most important in the following program 
is that subroutines are called at statement number 180, despite the jump made at statement number 90 to state- 
ment numbers 170 through 190 of subroutines. 

Thus, the GOSUB and ON..... GOSUB statements can be used in a convenient, multiple manner. 


10 A$=“FRENCH “:B$= “MATHEMATICS” : C$ =“ ENGLISH ” 

20 D$ = “SCIENCE " : E$ =“ MUSIC "> FS = “ATHLETICS” 

30 G$ =“SOCIAL STUDIES” : H$ = “ART "> 1$ =“"TECHNOLOGY ” 
40 J$="RELIGION ":K$=‘‘ECONOMICS ” 

50 PRINT “WHAT DAY OF THE WEEK ?” 

95 PRINT ” (1-MON, 2- TUE, 3-WED, 4- THU, 5- FRI,0- ALL)” 

60 INPUT X$ : X = ASC (X$) — 47 

70 FOR Y=0 TO 3:PRINT TAB (3+8XY);Y+1; 
80 NEXT Y : PRINT 

90 ON X GOSUB 170, 110, 120, 130, 140, 150 

100 PRINT : GOTO 50 

110 PRINT “MON: “ ; A$ ;C$ ;D$ ;B$: RETURN 
120 PRINT “TUE: ” ;H$ ;H$ ; E$;B$ : RETURN 

130 PRINT “ WED: “; A$ ;C$ ;J$;K$: RETURN 
140 PRINT “THU: “ ;D$; A$ ;E$ ;F$: RETURN 
150 PRINT “FRI: “; A$ ;D$;1$ ;G$ : RETURN 

170 FOR Y=1 TO 5 

180 ON Y GOSUB 110, 120, 130, 140, 150 

190 PRINT : NEXT Y 

200 RETURN 
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Now, consider the substitution of variables for 100 items of data. The use of variables A1 and A2 makes the 


following possible. 


10 A1l=5 
20 A2=30 
30 A3= 12 


Just a minute. This is terribly hard work for writing 100 statements ! For this, the primary array is available as a 
new type of variable, which makes program generation very convenient. Now, let’s look at what the primary 


array is all about. 


This means the box for 
variables should be 
prepared. 


Plus integer 
(constant, variable, 
equation) 


This is a statement to declare 
variable A as an array. This 
statement is absolutely 


necessary. 
Only numerals can go into 
the boxes ! 


Prepared variable boxes contain 0 
at this moment. 


This means that the computation 
of equation 2 + 3 should be put into the 


prepared A (50). 


(O.K. 30 +8 is 38. 
This goes into 
the A (0) box. 


Included in the 
A (10) box is 


Put the numeral in the 
A (10) box plus 8 into 
the A (0) box. 


Alo) =AGo)#8 


Now, you have understood what the primary array ts, See, the program is very short. As ts clear from this 
example, variables in the form of an array can assign 


haven't you ? 
Using the primary array, the program has been the parenthesis of subscribed variables, such as A 
(J), with variable J. This is the main feature of the 


primary array. 


generated as follows: 


10 DIM A (100) 

20 FOR J=1 TO 100 

30 READ A (J) 

40 NEXT J 

50 DATA 5, 30, 12,...... 
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Since an array is available for numeral variables, there must be an array available even for string variables. 


Here’s an introduction to what the primary array for string variables is all about. 


Prepare boxes for 
string variables. 


31 boxes for string 


Plus integer 
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‘a prepared boxes 


already put in. 


The string in the B$ (15) 


namely, A5 


are empty 


This is for string 


variables. 


So, the string in the B$ (30) 


So, don’t do box is “ZX” 


BS (16) 


The string in the B$ (0) 


ss ik 


t. 
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That's righ 
BS (16) 


for B$ (16) 
“a + al Ss 


“ 3 
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Add “Z"' and 


Let’s generate a simple program. Just a look at this. Keeping variable strings in the form of arrays eliminates the 


labour of writing whenever they are used. The program itself is neat and simple. 


C$ (2) 


10 DIM A$ (2), BS (2) 


20 FOR J=1 TO 2: READ A$ (J), BS (J) 


30 C$ (J) 


" +B$ (J) 


AS (J) +” 


40 PRINT A$ (J), BS (J), CS (J) 


50 NEXT J 
60 END 


YOUNG GIRL 
WHITE ROSE 


GIRL 


70 DATA YOUNG, GIRL, WHITE, ROSE 
ROSE 


RUN 
YOUNG 
WHITE 
READY 
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Some teachers say that testing is all right but putting test results in order is really hard. If so, some students insist 
testing should be stopped. A good method is available for teachers who are subject to giving tests to students. 

The use of an array helps them solve the problem ! The following shows student identification and marks for 
mathermatics. 
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Marks 


Generate a file program arranged in the order of merit. 


A file is asummary of data 
sorted out for items. 


10 DIM A (10), B (10) 

20 FOR J=1 TO 10 

30 READ A (J), B (J) : NEXT 

40 FOR K=1 TO 9:M=0 

50 FOR J=K TO 10 

60 IF B(J)<=M THEN 80 

70 M=B (J): L=J 

80 NEXT J 

90 B (L)=B (K):B(K)=M 

100 A1=A (L): A(L)=A (K) : A {K) =A1 
120 NEXT K 

130 PRINT “@” 

140 PRINT “ORDER OF MERIT (MATHEMATICS)” 
150 PRINT 

160 PRINT “STUDENT NO. ” ; TAB (14) ; 

170 PRINT “MARKS” 

180 FOR J=1 TO 10 

190 PRINT A (J) ; TAB (14) ;B (J) : NEXT J 

200 END 

210 DATA 20, 75, 15, 51, 12, 28, 40, 56, 23, 100 

220 DATA 16, 81, 31, 60, 45, 43, 26, 66, 11, 48 

RUN 

ORDER OF MERIT (MATHEMATICS) 


Leave file generation 


STUDENT NO. MARKS 


23 100 
16 81 
20 75 
26 66 
31 60 
40 56 
15 51 
11 48 
45 43 
12 28 
READY 
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We used to study french words using word-note- 
books. Smart and more simplified word-notebooks 
are available using the computer. French words and 
their meanings are contained in separate files. The 
computer gives two types of questions; one asking 
apout the meanings of Frech words retrieved from 
the file and the other asking English to be translated 
to French. In the program, the primary string array is 
used as the files containing French words and their 
meanings. Executing the following program, try to 
test your French vocabulary, answering a variety of 
questions the computer will ask you. 


10 DIM A$ (10), B$ (10), C$ (10) 

20 FOR J=1 TO 10 

30 READ A$ (J), B$ (J) 

40 C$ (J) = A$ (J) +B$ (J) 

50 NEXT J 

60 K = INT (10* RND (1)) +1 

70 PRINT “@IWHAT IS MEANING OF THE WORD?” 
80 PRINT A$ (K), 

90 INPUT x$ 

100 AX$ = A$ (K) + X$ intimate 
110 IF C$(K)=AX$ THEN PRINT” O.K.!!’°: FOR M=1 TO 3000: NEXT: GOTO 150 
120 PRINT “WRONG ": FOR M=1 TO 1000: NEXT M : 

130 PRINT “&” ;SPC (10): PRINT “SMa” ; TAB (12) : SPC (25) 

140 PRINT “I”: GOTO 80 

150 K = INT (10 * RND (1) ) +1 = i 

160 PRINT “TRANSLATE TO FRENCH” 

170 PRINT B$ (K), 

180 INPUT Y$ 

190 YB$ = Y$ + B$ (K) 

200 IF C$ (K) = YB$ THEN PRINT” O. K.!!” : FOR M=1 TO 3000: NEXT M: GOTO 60 
210 PRINT “WRONG ”: FOR M=1 TO 1000: NEXT M 

220 PRINT “&’ ;SPC (10) : PRINT “gggy” : TAB (12) :SPC (25) 

230 PRINT “ & ‘’: GOTO 170 

240 END 

250 DATA CHAT, CAT, PORTE, DOOR, MAISON, HOUSE, CHIEN 

260 DATA DOG, CANARD, DUCK, POISSON, FISH, MAIN, HAND 

270 DATA FENETRE, WINDOW, FILLETTE, GIRL, FEMME 

280 DATA WIFE 


RUN 
WHAT IS MEANING OF THE WORD ? 
POISSON ? 


In this case, the question about the meaning of poisson is answeres by keying-in that English. Display of O.K. !! is 
on the TV screen to indicate you are correct. For any other answer, error display is made. Conversely, further- 
more, there is the case when you answer “‘POISSON”’ when asked about translation. 
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Let’s look at this table (bottom right) which is an improvement on the test result table {bottom left) of mathe- 
matics, English and French for 3 students. 


Student 
.. Mathematics 


Subject .. English 
oo | 92 72 .. French 
ae nial A (1,1)/A (1, 2)| A (1, 3) 
English; tics , : , N= 1... John 
French English A (2, 1) |A (2, 2)| A (2, 3) N= 2... Peter 
N= 3... Paul 


French 


A (3, 1) |A (3, 2)| A (3, 3) 


In the table at right, the subject, student and marks are expressed as M (1 - 3), N (1 - 3) and A (M, N), respecti- 
vely. This is very convenient, for example, as is evident in the following: 


A (2, 3)-—>M = 2 means English, N = 3 means Paul———> English marks of Paul 


Simple! Writing A (2, 3) alone gives a clear description of the English mark of Paul. M and N in the A (M, N) 
rerresent separate items. Writing A (M, N) using two items is called the secondary array. Two items used mean 
sec ondary array. The primary array previously described has one item. 

Now, !ook at how this secondary array can be used in the program for the computer. 


This is a Variable boxes in the number of (5 + 1) for one line 
statement to 


prepare the 


Plus integer 
(constant, variable, equation) 


0 is in the 
boxes. 


ee Lh 
AGS) 


The statement for 


defining variable A 
as the secondary arr-”. 


@ Oniy numerals can be put 
into the boxes. 


Variable boxes 
in the number 
eee of (4+ 1) for 
one row 


@ In this status, all the boxes 
contain 0. 


I’m told to put 15, the 
product of 5 * 3 into the 
A (2, 1) box. 


e@ Similar to other variables, 
there are some variable 
boxes, in which M and N 
are O in the A (M, N). 


A (2, 1)=5*3 


This is a statement for 
putting the numeral in 
the A (4, 5) box into the 


The same numeral as 
A (4,5) box. 


~<f 


Have you 


10 
20 
30 
40 
50 
60 
70 
80 
90 
100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 


r children studied multiplication. The computer can help study. The multiplication table is to be 
generated, and can be used whenever required. The secondary array A (M,N) is used in the program. In other 
words, the value of M x N is assigned to A (M, N). 


DIM A (9, 9) 
PRINT “ @” 
FOR J=1 TO 79 
SET J,6: NEXT J 
FOR J=3 TO 27 
SET 5,4: NEXT J 
PRINT “EJMULTIPLICATION’’ 
PRINT 
FOR J=17TO 9 
PRINT TAB (4 x (J —1) +4) :J: 
NEXT J: PRINT : PRINT 
FOR M=1 TO 9 
PRINT M; 
FOR N=1 TO Q 
A (M,N) =MX*N 
PRINT TAB (4 *(N — 1) +4); 
PRINT A(M,N) ; 
NEXT N 
PRINT 
NEXT M 
END 


RUN 


MU 


LTIPLICATION 


a 
‘ 
4 


Girt 


BOAESEP 


OSSKNSSY 


1 
2 
3 
4 
5 
6 
7 
8 
9 


REA 


The secondary array uses many FOR ...NEXT multiple loops as in this program. Therefore, it is suggested that 
you clearly understand the subscript in the secondary array. As is clear from multiplication, this is the 9 x 9 
matrix. The secondary array plays an important role in processing data with matrixes and secondary elements. 


1 Z 3 4 

2 a 6 8 

3 6 2 12 
4 8 12 16 
5 10 15 20 
6 12 18 24 
7 14 Zl 28 
8 16 24 32 
2 18 27 36 
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Did you know that professional baseball pitchers use 
a random number table ? The random number 
sequence in the random number table is called a 
‘“‘progression’’ in which any numbers are equal in 
generation rates and the method of number genera- 
tion has no rules (termed random). Such numbers 
used are called random numbers. 


0, 1, 4,4, 4, &, 6, 7,8, 9,0, 1,2, 3,4 .00 


This progression has an equal rate for any number to 
be generated. In fact, however, the generation 
method is not random. {n other words, they are not 
random numbers. 


Dl, b, 1, 8, #, 3, 9, 1,8, 7,2, 14 1, By eae 


This progression is rather random in generation. 
However, the generation rate of 1 is very high. There- 
fore, they are not random numbers, either. 


Why not consider a random number sequence? You may have. already noticed that this is not an easy job. Don’t 
worry about it, for your computer does the job of generating random numbers. That's right, using the RND (__) 
command. All you have to do is to put your favorite plus integer in the parenthesis. Any plus integer will be O.K. 


10 FOR R=1 70 3 

20 PRINT RND (2) ; 

30 NEXT R 

40 END 

RUN 

0.38079483 0.75828109 0.44046507 
READY 4s __ 


Now, the mean for 1000 random numbers in taken, as follows: 


10 FOR J=1 TO 1000 
20 R=RND (1):S=S+R 
30 NEXT J: RG =S/1000 
40 PRINT RG 

50 END 

RUN 

0.4980582 

READY 


This mean is a value approximate to 0.5. From this fact, it is clear that the numbers thus generated are random. 
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Try to cast a dice. Naturally, one of the spots from 1 
to 6 will turn up. The pleasure of playing a dice lies in 
the fact that any spots can turn up. In other words, 
spots from 1 to 6 are generated at random. 

The computer is equipped with the RND function for 
random number generation. The problem is whether a 
dice can be produced by using this function. To tell 
you the truth, it can. How ? 

First, multiply the RND function by six. 


X6 
0< RND (1) <1 >0< 6X RND (1) <6 


Here you should remember the INT command. The 
INT command is used for the 6 x RND (1). 


INT (6 *RND (1) ) = 0, 1, 2, 3, 4, 5 


With this, the integers from 0 to 5 are generated at random. The dice requires integers 1 to 6, and so they 
are not enough. Did you notice that 1 is further added to them ? 


INT (6 * RND (1) ) + 1 = 1, 2, 3, 4, 5, 6 


Now, a dice is ready. Using this dice, let’s check the rate, at which the spots turn up. 


10 PRINT “NUMBER OF TIMES FOR DICE TO BE CAST” 
20 INPUT N 

30 FOR J=1 TO N 

40 R=INT (6XRND (1}) + 1 

50 IF R=1 THEN Ni=N1+1 

60 IF R=2 THEN N2=N2+1 

70 IF R=3 THEN N3=N3+1 

80 IF R=4 THEN N4=N4+1 

90 IF R=5 THEN N5=N5+1 

100 1F R=6 THEN N6=N6+1 

110 NEXT J 

120 P1=N1/N : P2= N2/N : P3 = N3/N 
130 P4 = N4/N : P5 = N5/N : P6 = N6/N 
140 PRINT P1, P2, P3, P4, P5, P6 

150 END 

RUN 

NUMBER OF TIMES FOR DICE TO BE CAST 
? 5000 

0.1702 0.1654 0.1628 0.1626 
0.169 0,17 

READY 


RND generates numbers from 
0.00000001 to 0.99999999. 


Also it will generate randam 


What do you think of the result ? The spots have almost the same rate of turning up. Mathematically, it is 
ideal that any spots turn up just once when the dice is cast 6 times. Therefore the ideal figures produced would be 
1/6. 
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Let's provide a mathematics teacher for your younger 
brother or sister. To begin with, exercise addition 
and multiplication of numerals from 1 to 9. For 
exercise of addition, 


10 A=INT (RND (1) * 9+1) 

20 B=INT (RND (1) x 9+ 1) 

30 PRINT “ “3A: PRINT “+”; 8 

40 PRINT “ CCT ICI” : INPUT C 

50 IF C=A+B THEN 80 

60 PRINT “THINK HARD ONCE MORE” 
70 GOTO 30 

80 PRINT “OK! WELL DONE”: GOTO 10 


Using the random number at statement numbers 10 
and 20, substitute two numerals from 1 to 9 for 
variables A and B. Then, the equation of adding two 
numerals is written, making an inquiry of an answer 
“2 “ At statement number 50, the judgement on 
whether the answer is correct or not is formed. 


to use numberals from 1 to 99. 


For multiplication exercise, the ‘’ + ‘’ plus sign may 5 Should be 

be changed to the *’ X ’”’ sign at statement numbers }. done in 

30 and 50. accordance 2 

Statement numbers 10 and 20 are changed as follows S| with the m4 Ss 
/ Fe equations 


at right, 
not at left. 


10 A=INT (RND (1) * 99 + 1) 
20 B= INT (RND (1) X99 + 1) 


This seems to be correct. Actually, however, the 
number of 1 figure does not match the number of 2 
figures (see diagram at right). So, something must be 
done to match the figures of the numbers. [n other 
words, using the string processing facility, the figure 
count is checked to write an equation. Modify the 
previous program as follows to match the figures. 


25 A$=STR$ (A) :B$=STR §$ (B) 
30 PRINT TAB (5— LEN (A $)) ;A 
35 PRINT ‘+’ ; TAB (5 — LEN (B $)) ;B 
40 PRINT “ "UOC IE  : INPUT C 


The computer converts two numerals to a string at statement number 25, and displays the respective numerals 
with their figures matched at statement numbers 30 and 40. Note how the TAB (~ )andLEN(__) are used. 
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100 ? “@"’: 
110 2? “Hl” :<W=1 
Now it is time to take a break. 120 FOR X=1 TO 7: FOR Y=1 TO 5:FOR Z=1 TO 5 
Key-in the program on the right 130 ? TAB ((X—1) 5) ;A$;: NEXT Z:?:NEXT Y 
and watch the random patterns 140 A$ = CHR$ (INT (RND (1) X 223 + 33)) 
being generated. 150 ? “BD” ;: NEXT X:? “Spee”: ww 


160 IF W>4 THEN 110 
170 GOTO 120 
$OFEOHOR MOE EON ROR ECE OHO FOF OK Fob pO Et tt tt tit tt tit eit. 
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The use of random numbers makes integrals possible. 
In this case, probability is used, called the Monte- Y 

Carlo method numerical integral. Let's determine the 

area of an ellipse (definte intergral). X*27/ATY* S54 
To simplify the calculation, 1/4 of an ellipse is con- 
sidered. The hatching area in the diagram at right is 
an elliptical interior of X7/4 + Y? = 1. Arrows are 
thrown at random to a rectangle made by the dotted 
lines. When many arrows are thrown, the ratio of hit 
times in the elliptical interior to the total thrown 
times is near that of the elliptical area to the re 
ctangular area. The RND function takes a part of an 
arrow. The following is a program for the area of an 
ellipse. 


10 PRINT “HOW MANY ARROWS TO BE THROWN ?” 
20 INPUT N 

30 PRINT “CALCULATION IN PROGRESS’ 

40 FOR J=1 TON 

50 X=2 XRND (1) : Y = RND (1) 

60 1F XXX/4+YXY<=1 THEN ND=ND+1 
70 NEXT J 

80 S=4 k(2X* ND/N) 

90 PRINT “ELLIPTICAL AREA S=";5S 

100 END 


RUN 

HOW MANY ARROWS TO BE THROWN ? 
? 100 

CALCULATION IN PROGRESS 
ELLIPTICAL AREA S= 6.4 

READY 


RUN 

HOW MANY ARROWS TO BE THROWN ? 
2? 1000 

CALCULATION IN PROGRESS 
ELLIPTICAL AREA S = 6.336 

READY 


The actual area of this ellipse is about 6.28. With 100 
arrows thrown, the result is 6.4, which is very ap- 
proximate to the actual area. With 1000 arrows 
fruther thrown, the result is more approximate to the 
actual area. Don’ you find it interesting to determine 
such an area using random numbers ? Strange 
enough, the more random the numbers are, the more 
accurate the answer becomes. 
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Here in Las Vegas, the exciting city with dreams of entertainment and making a quick fortune. Michael, who is 
fond of gambling, is playing with a slot machine. With a 10 cent coin in, he pulls the lever down. Spades, 
Diamonds, Hearts, Clubs or Dollars appear in the three windows, and coins come out depending on the pattern 
combinations. The 10 cent coin is lost if he fails. Let’s generate a program for that. 


Three the same, | win $ 0.25. For $$$, 
$$$, $$$ 1 win $ 1.00. Double, for 
example, Heart, Heart, Spade | win 
$ 0.1. For Spade on the left | win 
$ 0.05. 


AWA 
Ai 

\ 
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j 
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10 PRINT “@":D=0:H$=” ‘a 

20 DIM N$ (5), A (3) 

30 FOR X=1 T:) 10: H$=H$+" EBB”: NEXT X 

40 FOR X=1 TO 5: READ N$(X) : NEXT X 

50 PRINT H$;” $="; SPC (5); meamaaa”:D 

60 PRINT H$; “ > PRINT SPC (38) >" mR” 

70 INPUT “FORCE TO PUSH THE LEVER ?”:NN 

80 FOR Y=0 TO NN: RR=RND (1): NEXT Y 

90 FOR X=1 TO 3:A(X) =INT (5 XRND (1) )+1:NEXT X 

100 PRINT “ERG” ; 

110 FOR X=1 TO 3: PRINT N$ (A (X)),: NEXT X : PRINT 

126 IF A(1)<>A (2) THEN 170 

130 IF A(2)<>A (3) THEN 160 

140 IF A(1)=5 THEN PRINT H$; “JACKPOT!! $1.00” ; SPC(15) :D =D +1.00 GOTO 50 
150 PRINT H$; “ALL THE SAME! $0.25"; SPC (10): D=D+0.25: GOTO 50 

160 PRINT H$;“PRIZE 1S $.10;SPC{.5' D=D+0.1: GOTO 50 

170 IF A(1)=1 THEN PRINT H$;‘PRIZE IS $.95” ;SPC (15):D=D+0.05: GOTO 50 
180 PRINT H$: “SORRY. 10 CENTS MORE PLEASE”: D=D--0.1: GOTO 50 

190 DAT. BOA OFF YUY hhbhh $$$ 


Did you win ? Like Michael, you are fond of gambling, so why not try to generate the shape of a solt machine, 
and insert it into the above program. 
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Let the RND function generate exercises for the determination of a triangular area. Here, the RND function 
your teacher. Since it provides the values of triangular sides using random numbers, you calculate the area. The 
RND function is the best partner for you. 


10 DIM A (3), L$ (4) This does not make it possible to 
. generate a triangle. Try it once 


20 FOR J=1 TO 4 
30 READ L$ (J) : NEXT J 
40 FOR J=1 TO 3 


50 A (J) = INT (20XRND (1)) +1 ie 
60 NEXT J - A 3c 
70 IF A(1)>=A (2) +A (3) GOTO 40 are A> =Al2)tAB) 
80 IF A(2)>=A(1)+A(3) GOTO 40 » 
90 IF A(3)>=A(1)+A(2) GOTO 40 , — ° 
100 W = (A (1) +A (2) +A (3))/2 ANG: WS 
110 T=W:FOR J=1 TO 3 
120 T=T X (W—A\J)) : NEXT J A) 
130 SS = SOR (T) : S= INT (SS) 
Qe canal 
140 IF SS-S>=0.5 THEN S=S+1 
150 PRINT “ ESE ” Z A@) (3) 


160 PRINT *“’ CALCULATE AREA OF NEXT TRIANGLE” 
170 PRINT “ BUT RECKON FRACTIONS CF 0.5 AND OVER AS A UNIT CUTTING AWAY REST” 


180 PRINT 

190 PRINT TAB (8) ;“A” 

200 PRINT TAB (8) ; “ZN” ; TAB (15) ; LS (1! ; A (1) 
210 PRINT TAB (7); 4 N" ; TAB (15) ; LS (2) ;A (2) 
220 PRINT TAB (6) ; “4 Ry” + TAB (15) ; L$ (3) ; A (3) 
230 PRINT TAB (5) ; “7 xy" 

240 PRINT TAB (3) ;“B Ne" 


250 PRINT TAB (4) ;“OO0000000n0 " 
260 PRINT “ESR3Ea”’ 


270 PRINT TAB (3) ; L$ (4) ; 

280 INPUT Y 

290 IF Y=S THEN PRINT SPC (7) ;O.K. !!’: FOR J=1 TO 3000: NEXT J: GOTO 490 
300 IF Y<S THEN PRINT SPC (4) ;“TOG SMALL” : GOTO 320 

310 PRINT SPC (4) ;“TOO LARGE” 

320 PRINT “Ei”; 

330 PRINT TAB (26) ;SPC (13) : PRINT “fl” ; 

340 GOTO 270 

350 DATA SIDE LENGTH AB =, SIDE LENGTH BC = 

360 DATA SIDE LENGTH CA =, TRIANGLE ABC AREA S IS 


a 
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Using the direct mode, input the following statement: 


SET 79,49 


How was that ? The light is on at the bottom right 
corner on the TV screen. Then, 


RESET 79, 49 


TV screen 


The light goes out, doesn’t it ? 

As you see, the SET and RESET statements function 
to light and put out only the spot as shown in the 
diagram at right. 


Flickering at the front bottom TV screen is white. 
right corner. 
10 PRINT “fq” 10 PRINT “fl” 
20 X=79:Y=49 20 FOR X=0 TO 79 
30 SET X, Y < light on | 30 FOR Y=0 TO 49 
40 RESET X, Y < light off 40 SET X, Y 
50 GOTO 30 50 NEXT Y, X 
60 GOTO 10 
For writing a rectangle of the For writing a slash line 
screen size. 
10 PRINT “ f”’ 10 PRINT “ @” 
20 FOR X=0 TO 79 20 PRINT “LENGTH OF DIAGONAL” : 
30 SET X,0 ) 30 INPUT Y 
40 SET X, 49 40 X =SOR (Y X Y/2) 
50 NEXT X 50 FOR A=1 TO X 
60 FOR Y=0 TO 49 60 SET A,49-—A 
70 SET 0, Y 70 NEXT A 
80 SET 79, Y 80 GOTO 80 
90 NEXT Y Pythagorean Theorem is applied. 
99 GOTO 99 


Let’s see something new ! 


10 PRINT “ @” TV screen after program execution 
20 FOR Z=1 TO 99 Se ae ‘i re 

30 SET Z,Z 
40 NEXT Z 
50 GOTO 50 
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That’s right. In fact, with more than 80 in X direc- 
tion and more than 50 in Y direction, 


x #: 
ew: 
t 
ti: 
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& eat 
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f 


Xx <— X — 80 
Y < Y — 50 


This is automatically calculated. 
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10 PRINT “fi”: Y=1 
20 FOR X=0 TO 79 
30 SET X, Y 

40 RESET X, Y—-1 
50 NEXT X 

60 Y=Y+1 

70 GOTO 20 


Did you see the white line moving horizontally while 
shifting vertically one by one. This is designed to 
help you understand the principles of TV. 

An ordinary TV has about 500 such lines to produce 
a picture, and about 30 pictures per second are trans- 
mitted, 


Ball Bounced ...... 


10 PRINT ” @” 

20 FOR X=0 TO 79 

30 SET X,0:SET X, 49 

40 NEXT X 

50 FOR Y=0 TO 49 

60 SET 0,Y:SET 79, Y 

70 NEXT Y 

80 X = 79 X RND (1) : Y = 49 XRND (1) 
90 A=1:B=1 

100 SET X, Y 

110 IF X <2 GOSUB 200 

120 IF X >78 GOSUB 200 

130 IF Y <2 GOSUB 250 

140 IF Y >48 GOSUB 250 

150 RESET X, Y 

160 X=X+A:Y=Y+B: GOTO 100 
200 A=—A: MUSIC “ "~ AO” : RETURN 
250 B=—B: MUSIC” AO” : RETURN 


How’s that ? Did you understand the program 
flow ? This program has three important points. 
The first is statement number 80 by which the 
starting point of a ball is generated using random 
numbers. The second are statement numbers 110 to 
140 by which the check is made on whether the ball 
was bounced off the four walls. The third are state- 
ment numbers 200 and 250 by which the ball’s direc- 
tion is changed when bounced off the wall. 
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Stone Thrown into a Pond 


10 X=40: Y=25 

20 DEF FNY (Z) = SOR (RXR —- 2X 2Z) 
30 PRINT “ @” : SET X, Y 
40 R=R+5 

50 FOR Z=0 TO R 

60 T = FNY (2) 

70 SET X+Z, Y+T 

80 SET X+Z,Y-—T 

90 SET X —Z,Y+T 

100 SET X—-Z,Y-T 

110 NEXT Z 

120 IF R<>25 THEN 40 
130 GOTO 130 


Look, it's likely that the SET and RESET 
can also be used to generate seasonal 
constellations. 


Shall we generate a TV 
planetarium, using the 
MUSIC command ? 
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Let’s look at a model concerning the animal ecology on graphics display using the computer’s SET statement. 
Taken up here is the model of animal struggle for existence. This model is ecologically given in the form of a 
differential equation. In fact, however, it is of prime use for reference as a simple example of numeric calcuation 
by the computer. 


Rabbit and Fox 


A rabbit and a fox are taken as an example of the relationship ‘“The weak become the victim of the strong’ in 
the animal kingdom. Also presumed here is that the fox lives on the grass-eating rabbit. According to the 
ecological model, the numbers of the respective rabbits and foxes, when presumed X and Y, change in accordance 
with the following differential equation: 


oa = AA— BAY se nieus ce cues t Change in the number of rabbits 
EE = EV — OF acisninesenss Change in the number of foxes 


A, B, C and D are constants. The XY item represents the relationship of ‘““The weak become the victim of the 
strong’. Looking at the change in the number of rabbits, the second item would be zero if foxes were not in 
existence. The rabbits continue to increase by geometrical progression. In fact, however, foxes actually exist and 
increase in number to stop the increase of rabbits (2nd item). For the change in the number of foxes, the first 
item would be zero if rabbits were not in existence, and they are dying one after another. With rabbits, the 
number of foxes increases in accordance with the CXY value in the first item. This is how the rabbits and foxes 
are related to each other. 

To look at this differential equation numerically using the computer, the approximate values based on the 
tangential method are utilized. This makes the derivative with respect to time (dt) approximate to the possible 
derivative time (DT), and when dx and dy are assumed to be DX and DY, this differential equation turns to an 
algebraical equation, as follows: 


DX = (AX — BXY) DT 
DY = (CXY — DY) DT 


Shown on the following page is an example of the program based on this method. 
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10 REM RABBIT & FOX< 
20 READ A,B,C, D, DT, TT, K 

30 DATA 4, 2, 1, 3, 0.01, 2, 30 

40 FOR H=1 TO 20:H$=H$+"B9": NEXT H 

50 PRINT “RARER “ | SPC (3) 5” A)”: PRINT ” Lay” 
60 PRINT TAB (4) ; “FOX”; “Gl” ; HS; EGE” ; TAB (22) > Bg” 
70 PRINT TAB (22) ; (Male) : PRINT TAB (22) ; “Wii” 

80 PRINT TAB (21) ;““RABBIT” 

100 PRINT “ " ; H$ ; SPC (38) : PRINT SPC (38); fH”: H$ 

110 INPUT “NUMBER OF RABBITS RO =":X 

120 INPUT “NUMBER OF FOXES FO =": Y 

200 FOR J=1 TO K 

210 FOR T=0 TO TT/K STEP DT 

220 X=X+(AXX—BXX XY) XDT 

230 Y=Y+(CXXXY—DXY) XDT 

240 NEXT T 

250 SET 4 X(X +6), 4 x(8— Y) 

260 NEXT J 

270 INPUT “DO YOU WANT TO TRY ANOTHER? (Y/N): Y$ 
280 PRINT “ E’ ; SPC (38) ; “Ry” 

290 IF Y$=“Y" THEN 100 

300 END 


Now for the program operation. The computer asks 
about the initial values for the numbers of rabbits and 
foxes. For example, key-in RO=5 and FO=5. Begin- 
ning with the initial values, both rabbits and foxes 
change in number with time, as seen on the TV 
screen. 

A fine oval figure is drawn. Let's consider the con- 

tents of the figure. 

Part 1: With foxes being small in number at first, 
rabbits increase rapidly, while foxes increase 
gradually. 

Part 2: With foxes increased in number, rabbits 
have reached the peak in number and began 
to decrease. 

Part 3: Rabbits continue to decrease. So do foxes. 
Both rapidly decrease. 

Thus, the number of the respective animals returns 

to the initial condition. Setting various initial values 

for the numbers of rabbits and foxes makes it possible 
to obtain a variety of oval graphs different in size. 
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An introduction to a new type of statement for the 
data input from the keyboard is given here. Its Name 


With no key pressed, 
the numeral 


—— 


Oh, you are 
pressing 5. 


variable is Q. 


This is most suitable for use in the execution of quick 
processing required for a game, for example. In the 
INPUT statement, ‘’? ” is asked, and with data keyed- 
in, the[CR] key is pressed for shift to the next step. 
Contrary to this, the GET command proceeds as 
follows: 


=e me = 


CLL Lif 


UATE 


@ When a key is pressed while a program exe- 
cution is under the control of the GET 
command, data for one character space is 
substituted for the variable for shift to the KE / 
next step. 

@ When no key is pressed, 0 or blank is sub- FEIN 
stituted for numeral variable or string variable ~~ 
for shift to the next step. 


The GET command is often used in such a manner 

that the program waits until a character or numeral 

is keyed-in 

Before playing a game using the GET command, let’s work a simple exercise. Using the GOTO command, execute 
the GET command repeatedly. Try to key-in the numerals from 1 to 9 for variable Z. 


10 GET Z 
20 PRINT Z;: GOTO 10 


When the key is pressed, the numeral of the key is displayed. 
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Now, let’s generate a program for a position-taking 
game using the GET and SET commands. (See the 
program on the following page.) This game is for two 
players. Inside the square frame on the TV screen, 
two players start from the top left and bottom right 
positions, respectively, and block the movement of 
their opponent while changing directions with key 
Operation as shown below. The player blocks the 
movement of its opponent to win the game. 
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Mr. A (Start from top left) 


Keys [1 ][2] [3] [4] 
‘bot 2 o«< 
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Mr. B (Start from bottom right) 


keys [6 ][7] [8] [9] 
Lot + « 


While any key is pressed by the opponent, no other keys can be operated. Therefore, keys should be pressed 
alternately. 


This program uses a number of statements and commands you have so far learned. So why don’t you look at 


how they 


10 
20 
30 
32 
35 
40 
41 
42 
45 
50 
55 
60 
70 


80 SET A, 49: Z (A, 49) = —1 


90 

100 
110 
120 
130 
140 
150 
160 
170 
180 
200 
210 
220 
230 
240 


IVIL 
oy) 


are generated? In fact, however, this program requires a program area of almost 13K bytes. 
CLR 

DIM Z (49, 49) 

PRINT “ @” ; TAB (26) ; “A STARTS” 


PRINT TAB (26) ; “FROM TOP LEFT.” 

PRINT “ @”’: PRINT TAB (26) ;“’ 1—DOWN 2 — UP” 
PRINT TAB (26) ;““3— RIGHT 4— LEFT” 

PRINT : PRINT 

PRINT : PRINT : PRINT TAB (26) ;““B STARTS FROM” 
PRINT TAB (26) ; “BOTTOM RIGHT.” 

PRINT : PRINT TAB (26) ;“6— DOWN 7— UP” 

PRINT TAB (26) ; “8 — RIGHT 9 — LEFT” 
FOR A=0 TO 49 

SET A,0:Z (A, 0)=-1 


NEXT A 

FOR A=1 TO 49 

SET 0,A:Z (0, A)=—1 
SET 49, A: Z (49, A) =—1 
NEXT A 
X1=4:Y¥1=4:D1=1 


X2=45:Y2=45:D2=7 

GOSUB 200: IF M=1 GOTO 10 
GOSUB 300: IF M=1 GOTO 10 

GOTO 160 

GET X 

IF X=0 THEN 260 

IF X=1 THEN Y1=Y1+1: GOTO 270 


IF X=2 THEN Y1=Y1—1: GOTO 270 

IF X=3 THEN X1=X1+1: GOTO 270 

IF X=4 THEN X1=X1—1: GOTO 270 

X =D 1:GOTO 220 

D1=X: IF Z (X11, ¥1)=—1 THEN 400 

MUSIC ” [JA0’: SET X1, ¥1:Z (X1, Y1) =—-1 

RETURN 

GET X 

IF X=0 THEN 360 

IF X=6 THEN Y2=Y2+1: GOTO 370 

IF X=7 THEN Y2=Y2-—1: GOTO 370 

IF X=8 THEN X2=X2+1: GOTO 370 

IF X=9 THEN X2=X2—1: GOTO 370 

X=D2:GOTO 320 

D2=X:1F Z (X2, Y2)=—1 THEN 450 

MUSIC “AO” : SET X2, Y2 : Z (X2, Y2) = —1 

RETURN 

PRINT TAB (27) ;“MR. B WINS!” 

MUSIC “C3DEGLICEGLICCDEG MICEGCICC ” :M=1: RETURN 
PRINT TAB (27) ;““MR. A WINS!” . 
MUSIC “LIG3LJALIBCDE #FGABCLICTIDOI40OCEMFO#FOG”:M=1 


RETURN 
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It is interesting to have a clock function in the 
program. A digital clock or world clock depends on 
the program! Such a function can be fulfilled by TI$. 
Key-in the following on your computer and press the 


key. 


PRINT TI$ 


The following will be on display, for example. 


001234 <k What is this? . 


? : Ancient Japanese 
What does this number of 6 figures for the contents Water Clock 


of string variable TI$ mean? That's right, it re- 
presents the time below: 


00 12 34 00 hours, 12 minutes and 34 seconds 


Hours Min. Sec. 


This time does not always synchronize with your watch. For the TI$ is automatically set to OO hours, 00 minutes 
and 00 seconds when the power switch of the computer is turned on. Display the TI$ once again, and you will 
notice the difference in contents from the previous display. That's correct, the number of 6 figures in the TI$ 
changes momentarily in the exactly same manner as the face of a digital clock. The value of the TI$ up to now 
is a lapse of time after the power switch was turned on. 


10 TI$ = “102634” 
20 PRINT TIS 

30 TI$ = “256471” 
40 PRINT TIS 

50 END 

RUN 

102634 

020511 

READY 


With the above statement numbers 10 and 30, the 
TIS can be set to any particular time. However, the 
number between quotation marks “ ‘" should be 
only 6 figures, Statement number 30 indicates 25 
hours, 64 minutes and 71 second, which should 
normally be 2 hours, 5 minutes and 11 seconds. 
Look at the PRINT result of the TI$ at statement 
number 30, showing 2 hours, 5 minutes and 11 
seconds. This is how the computer automatically 
corrects the figures to make the correct time display. 


XXse 


The following program shows the relations between 


TI$ and ordinary strings, such as A$. 


10 
20 
30 
40 
50 
60 
70 
RU 


123456 
123500 


A$ ="123456" 

TIS = A$ 

PRINT TIS 

FOR T=1 TO 5000: NEXT T 
BS =TI$ 

PRINT B$ 

END 

N 


TI$ is a lapse of 4 secon 


during program execution. 


READY 


SoXX 


Here is a simple world clock. Of course, it’s a digital clock. This can tell you the time in your favourite country. 
Now execute the following program, where the TI$ also ticks. There is a difference of 9 hours in time between 


London and Tokyo, isn’t there? 


cities of the world. 


—_ 
© 


HONOLULU 


PRINT “@”’ 
DIM C$(10), D(10), E(10), T$(10) 


FOR J=1 TO 10: READ C$ (J), D(J): NEXT J 


PRINT ‘WHAT TIME !S IT IN LONDON ? ” 


INPUT TI$: PRINT “” @’’ 

PRINT “fH”: TS (1) = TI$ 

FOR J=1 TO 10 

E (J) = VAL (LEFT$ (T$ (1), 2)) + D (J) 
IF E (J)=24 THEN E (J) =0 

IF E (J)<O THEN E(J) = 24+ E(J) 
T$(J) = STR$ (E(J)) + RIGHTS (T$(1), 4) 


IF LEN (T$(J))=5 THEN TS$(J) = “0” + T$ (J) 


PRINT C$(J) ; TAB(20) ; LEFTS$ (T$(J), 2) ; 
PRINT “H ”; MID$ (T$ (J), 3,2) ;“M ” ; 
PRINT RIGHTS$(T$ (J), 2); S$": NEXT J 
GOTO 60 


DATA LONDON, 0, MOSCOW, 3, RIO DE JANEIRO, —3 
DATA SYDNEY, 10, HONOLULU, —10, TOKYO, 9, CAIRO, 2 
DATA NEW YORK, —5, SAN FRANCISCO, —8, PARIS, 1 
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This is your turn to generate a program which tells the time of any other 
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This is about the TEMPO and MUSIC statements that make the computer play music. The TEMPO statement 


assigns a tempo, as it is implied. 


Musical notes are converted into strings according to the pitch (semitone and octave included) and duration of 


Before describing in detail, the constitution of TEMPO and 


tones, and played under the MUSIC statement. 


MUSIC statements are outlined below: 
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MUSIC “String” M$ (String Variable) 


This is a statement by which a melody or sound effect assigned by a string or string variable is actually produced 
from a speaker. Its tempo is in accordance with that assigned by the TEMPO statement. 


The following indicates how the melody or sound effect is converted into a string. Musical notes are assigned 
according to the tone pitch (octave and scale) and the duration (quarter note J or eighth note })). Description 
is given of the assignments of the octave, scale and duration in that order. 


Octave Assignment _| (|) 
The sound range possible with the computer covers 
three octaves as shown at right. The black point 
shows a C note (“do’” in C Major), and three C 
notes are separated by the octave assignment, as 
follows. 

C in the low range.............+ 

C in the mid-range............... 

C in the high range............... 


Scale Assignment: CDEFGAB#F R 

The CDEFGAB and # (sharp) symbol are used for 
scale assignment. 

Relationship between the scale and CDEFGAB is 
shown in the diagram at right. The Sharp # symbol 
is used for semitone assignment. 

The rest (no sound) is assigned with R. 


Duration Assignment 
Assignment is made on the duration of a tone whose pitch has already been assigned. Notes from thirty-second 
to whole are assigned with numerals from 0 to 9. (This assignment of duration also applies to R) 


When notes identical in duration are repeated, the duration assignment from the second note can be omitted. 
With no duration assigned from the start, a program execution is carried out with quarter notes (duration 5) 
regarded to be assigned. 
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Let’s do some exercises of translating musical notes to strings. The following notes are translated referring to 


the table on the previous page. 


d First, the scales of C Major, D Major and E Flat 


CMajor “CDEFGABT_ jC” 
D Major “DE#FGAB[_1#CI_JD” 
EFlat “#DFG#G#AMCCIDCI#D” 


} Substitute the 2 octave scale of G major for G$ 
using quarter and eighth notes. 


G$= “LJIGUA3LIBCDE#FG5 


A3BCICil107 EN#F(IIG 8 
Be G note with high 
Quarter rest. dotted half. 


(Quarter notes) 
C Major 


yy Let’s substitute the beginning of the Beatles’ GIRL for GR§&. 


GR$= "7Cc3MbD 
M#D4°7#D1T1#D0471#D 1 
TMF 4M#dD1MD4M™c 1 
[1C5GTIC#A 
#G471C1B4C1C1 
TbD4c1B4#G1 
G7R5” 


This seems to be difficult, but you will soon 
get used to it. 

In case of a long tune, the string becomes too 
lengthy to be put into a statement of two lines 
on the TV screen. In this case, the tune is 
substituted by more than one string variables 
with their sum taken as a string variable for the 
MUSIC statement. 


GIRL (John Lennon and Paul MaCartney) 


10 TEMPO 5 
20 MUSIC GR$ 
30 GOTO 10 


The beginning of the “GIRL” is 
repeated many times. 
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ty Let’s make a simple music box. This music box contains 2 small tunes, one is pleasant and the other, sad. 
Strings are properly cut for use in the box. Key in the J or N. 


10 REM MUSIC BOX (FROM ETUDE OF F.KROEPSCH) 

20 JI$="Ci™7C_ Ec. GET CE CAT DAT FID AMD “ 

30 J2$="GB"'B IAL IG I#F™ FID BCE ICBGFD” 

40 J3$="C_BC_LIGECGE™ C5R” 

50 N1$="“D_FLADFALGLIFADGA#ALIA#CEG#AAGFCIF7DAE” 
60 N2$6="DFA™D IFTIAEG #A™E” GU IFAAT FT DIE TM#FCAMD#GAEF HC" 
70 N3$¢=""DLIDUFLADEF#CDFAM#C™D5R5” 

100 INPUT “MAJOR OR MINOR? (J,N)” ;M$ 

110 IF M$=""N” THEN 230 

200 TEMPO 4 

210 MUSIC J1$ ; J2$ ;J1$ ; J2$ : J3$ 

220 GOTO 100 

230 TEMPO 4 

240 MUSIC Ni$ ;N2$ ;N1$ ;N2$ :N3$ 

250 GOTO 100 


Did you enjoy the automatic music | 
playing? 

The computer is a good performer 
capable of handling even a difficult { 
passage. 


Your musical notes converted to strings 
are named and stored in a tape. Now 
make a music library for yourself. 
For details, see page 97. | 
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Alice is a heavy sleeper. Whenever she makes up her 
mind to get up early in the morning for jogging in 
the woods, she awakes to find it is time for school. 
She talked to her Prince about the fact, and then he 
advised her of a program saying, “‘Alice, why not set 
the timer so that you can get up at 7. Your favorite 
Chopin will sound then | will come down to the 
woods to wait for you.” 


10 REM JOHANN’S MAZURKA 
20 MM$="A3":M1$= “A50#4C 30DDED#FOGO#F OOGOFF 40E 30D0#CB” 
30 M2$= “A300D2R 00D 10ME 2700 4€C 3BD#C 70#C 3” 

40 M3$="A30#C2R ODFC 10D 204C B 3A0D 70D 3” 

100 PRINT “ @” : INPUT “ WHAT TIME IS IT NOW? ”:TIS 

110 INPUT “WHAT TIME DO YOU WISH TO WAKE UP? ”;TM$ 

120 PRINT “@” 

130 PRINT ” GIES” - TAB (17) : TIS 

140 IF VAL (LEFT$ (TI$, 6)) <> VAL (LEFT$ (TM$, 6)) THEN 130 

150 TM$ = “ 9999 ”’ 

160 TEMPO 3 

170 MUSIC MM§, M1$, M2$, M1$, M3$, M1$, M2$, M1$, M3$ 

180 GOTO 120 


Input the actual time at the first INPUT statement. That’s right, the actual time is substituted for TI$. As you 
remember, a number of 6 figures must be used, for example, 200000 for 8 o’clock at night. The(CR]key is 
pressed simultaneously with the time signal. Then, key-in the time you wish to wake up at. For example, 
070000 is O.K. for Alice. You can create your own clock with a timer available to show the time anywhere in 
the world. This all depends on your ability of program generation. 
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Determine the value and curve of SIN when an angle varies from O degree to 180 degrees with 10 degree in- 
crements. 


10 PRINT “ CR)” ; TAB (5) ; “SIN” 
20 PRINT 

30 FOR K=0 TO 180 STEP 10 
40 X=K X 1/180<==*. Ore == 


An angle is unclear to me 
if you say in degrees. 
Say it in radians. 


50 S=SIN (X) 

60 A=INT (10 X S) 

70 PRINT K : TAB (4): O.K., the degree is multiplied 
80 PRINT S; TAB (18 +A); by 7/180 for the radian. 


90 FOR J=O TOA 
100 PRINT “xX”; 
110 NEXT J 

120 PRINT 

130 NEXT K 

140 END 


Execute the above program. This graph is rather 
rough. As for drawing graphs, a lot of examples will 
be described later so that you can learn more about 
them. 
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Now, let’s generate a program to determine the prime numbers. A prime number is the one that cannot be 
divided by any integer smaller than itself, except for 1. Since the first prime number is 2, the multiples of 2, 
namely, even numbers larger than 2 are not prime numbers. To use variables with subscripts effectively, even 
numbers are excluded from the start. 


10 DIM P (255) Substitute 256 odd numbers from 3 
20 FOR J=0 TO 255 to 513 for the parenthesis of 
30 P (J)=J XK 2+3:NEXT J variable P with a subscript. 


40 FOR K=0 TO SOR (255) 
50 IF P(K)=0O THEN 90 
60 KK=K +P (K) 

70 FOR L=KK TO 255 STEP P (kK) 
80 P(L)=0: NEXT L 
90 NEXT K 
100 PRINT 2; 
110 FOR M=0 TO 255 
120 IF P(M)=0 THEN 140 
130 PRINT P(M): 

140 NEXT M 
150 END 


Find prime numbers from the small 
in value and substutute O for the 
values of the multiples in the 
parenthesis of P. 


The only even number “2” is first 
displayed, and then the values of 


P { ) which are not 0, namely, 
prime numbers are on display. 


This program is a bit complex, isn’t it? Note that the multiples of the prime number are excluded from the start. 


mri 


Names are sorted out when making a list of members. The use of a convenient program, if any, facilitates listing 


of any kind. 


Here you learn how to sort strings for address books, telephone numbers or housekeeping account books. 


HOW MANY PERSONS ARE SORTED? ” 


10 PRINT ° 


20 INPUT X 


30 DIM N$ (X) 


— IN NAMES ONE BY ONE” 


KEY 


40 PRINT ” 


JOB DISCONTINUED ! 


1 TO X: A$ 


’ 


0 


BUT IF 


50 PRINT ” 
60 FOR A = 


STR$ (A) 
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100 NEXT A 


110 A=A-—1 


120 FOR B=1 TO A—1 


130 FOR C=1 TO A-B 


>IF D<E THEN E=D 


F=1 


E=LEN (N$(C+1)): 


142 X = ASC (MID$ (N$ (C), F, 1)) 


140 D=LEN (N$ (C)) : 


: IF X>Y THEN 150 


143 Y = ASC (MID$ (N$ (C + 1), F, 1)) 


144 IF X<Y THEN 180 


145 IF (E=F)xX(D=£) THEN 180 
146 IF (E=F)x(D>E) THEN 150 


148 F 


:GOTO 142 
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190 PRINT 


200 FOR B=1 TOA 
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The computer deals cards for you. It shuffles them correctly using random numbers, causing no trickery to 
occur. 


10 DIM X (4, 13) 

20 C=0 

30 PRINT : FOR A=1 TO 5 

40 GOSUB 90: PRINT : NEXT A: PRINT 

50 PRINT “IS YOUR HAND ALRIGHT WITH THESE CARDS? ” 
60 INPUT “ALL RIGHT (1), GIVE ME NEXT (2)? ";A 

70 ON A GOTO 400, 30 

80 GOTO 50 

90 C=C+1:1F C=51 THEN 500 

100 M = INT (4X RND (1)) +1 

110 N= INT (13 X RND (1)) + 1 

120 IF X (M,N) =—1 THEN 100 

130 X (M, N) =—1 

140 IF N=1 THEN PRINT“ ACE :”;: GOTO 180 

150 IF N=10 THEN PRINT N ; TAB (5) ;“:";: GOTO 180 

160 IF N<10 THEN PRINT N; TAB (5);‘: :: GOTO 180 

170 ON N—10 GOTO 200, 210, 220 
180 ON M GOTO 300, 310, 320, 330 

200 PRINT ’* JACK :";: GOTO 180 

210 PRINT ‘* QUEEN: ;: GOTO 180 
220 PRINT “KING :;: GOTO 180 

300 A$="“@": GOTO 340 

310 A$="¥W" : GOTO 340 

320 A$ ="@" : GOTO 340 

330 A$ =" : GOTO 340 

340 FOR B=1 TON 

350 PRINT A$; 

360 NEXT B 

370 RETURN 

400 PRINT 

410 PRINT “ THEN | RESHUFFLE. ”’ 
420 FOR M=1 TO 4: FOR N=1 TO 13 
430 X (M, N) =0 

440 NEXT N,M: GOTO 20 
500 PRINT 

510 PRINT “ TWO CARDS REMAIN...DO YOU CONTINUE ? ” 
520 INPUT “ YES (1), NO (2) ? ";B 

530 ON B GOTO 400, 550 

540 GOTO 510 


550 END 
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Give the programs 
file names to make 
SAVE “NAME”, 

That's all. 


Then, use the 
SAVE 
command. 


| have several programs, 
but | wonder how they 
can be sorted! 


| want this program to be 
recorded on tape. 


It is convenient if the value of 
the counter is noted when using 
the SAVE command. 5 


ON SAVE “NAME” 


key operation 


L 
The name should be no more than 
16 characters. 
TV screen display ¥ RECORD. PLAY Preparations for recording are O.K. !! 


— 


Cassette tape recorder Recording start!! 


operation 


TV screen display WRITING NAME Recording in progress 


No name is displayed with no file name 
given to a program. 


TV screen display READY Recording completed 
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| want to check that the program has been recorded 
correctly on tape... 


-_- —_ 
_=—— . 
— 
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2) VERIFY “NAME” 


“Name” is not required if a file name is not given. 


(1) Rewinding the tape. 


(3) v PLAY... TV screen display. 


(5) FOUND ««***......... This is on display if another program is found. Its file name, if given, is 
***** (file name) displayed as ****, 


(4)|PLAY | button pressed. Cassette 


tape recorder operation. 


FOUND NAME........ 


DATA ERROR 
READY 


meaning an error in 
recording. When this 
is on display, do SAVE 
once again. 


(3) OK 


READY 
With this display, 
recording is verified. 


(7) VERIFYING NAME 


Checking that recording is correctly 
done is in progress. 


LOAD 


How is the program put in the computer's memory 
from the cassette tape? 


a) LOAD “NAME” 


(2) ¥ PLAY 
Display and operation are same as the steps (3) to (6) of the 
(3) Press the |PLAY} button. VERIFY command, except for (4) and (5) which are the 
displays for the LOAD command. 
(4) FOUND **** 
(6) FOUND NAME 
i) LOADING NAME ...........--...--- Transfer to the computer in progress (loading). 


aS 5 eee Loading completed. 
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Data storage is also required if programs can be stored. ... 
To do so, 5 more statements must be learned. Then, a cassette tape can be used as a storage of data. 


WOPEN.. 2.46.5 «+ This prepares for data writing. It also serves to name a group of data. 

PRINT Tsxag ctu Identical in use to the PRINT statement, this writes data on a cassette tape. 

BUIPER occu se we This statement prepares for data readouts. It serves to find a data group with the 
name given. 

INPUT/T «2a e cae Identical in use to the INPUT statement, this reads data out of the cassette tape. 

GLOSE « o. ea aw ss This statement must be executed before ROPEN if WOPEN is executed or before 


WOPEN if ROPEN is executed. 


To store data, numerals from 1 to 99 are first written on a casstte tape. The “DATA” at statement number 10 is 
the name given to a group of data to be written. A maximum of 16 characters can be used to name a group of 
data. Of course, it is unnecessary to have a name if so desired. 


10 WOPEN “DATA” 
20 FOR X=1 TO 99 
30 PRINT/T X 

40 NEXT X 

50 CLOSE 

60 END 


O.K., | will prepare now.. . 


Now, it is time to read the data which has just been 
written. First, rewind the cassette tape, then execute 
the following: 


10 WOPEN “DATA” 
20 FOR X=1 TO 99 
30 INPUT/T A 

40 PRINT A 

50 NEXT X 

60 CLOSE 

70 END 


Why not execute the above program again with 100 substituted for 99 at statement number 20? Anerror will 
occur this time. Because the 100th data was not originally written. It is impossible to memorize the written 
data counts. For this, a numeral, for example, —99999999 unrelated to that used for data is written asa mark at 
the end of written data. 


10 WOPEN “DATA” 10 ROPEN “DATA” 
20 FOR X=1 TO 99 20 FOR X=1 TO 200 
30 PRINT/T X 30 INPUT/T A 
40 NEXT X 40 IF A=—99999999 THEN 70 
90 PRINT/T —99999999 50 PRINT A 
6C CLOSE 60 NEXT X 
70 END 70 CLOSE 
80 END 
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Statements for data storage and readouts can also be used for strings. 
The five composers’ names are written on the cassette tape and read out of it. 


10 DIM N$ (5) 

20 N$ (1) = “BACH “ 

30 N$ (2) =“ MOZART” 

40 N$ (3) =” BEETHOVEN ” 
50 N$ (4) =“ CHOPIN ” 

60 N$ (5) =” BRAHMS ” 

70 WOPEN “ GREAT MUSICIANS ” 
80 FOR J=1 TO 5 

90 PRINT/T N$ (J) 

100 NEXT J 

110 CLOSE 

120 END 


This is identical to numeric data writing. Then, 
readouts are done as follows: 


200 DIM M$ (5) 

210 ROPEN ‘GREAT MUSICIANS ” 
220 FOR K=1 TO 5 

230 INPUT/T M§ (K) 

240 PRINT M$ (K) 

250 NEXT K 

260 CLOSE 


With this, writing and readout are completed. As you.may have noticed, the name of string variable N$ used for 
writing is different from that of string variable M$ used for readouts. Since the value itself is written in the 
cassette tape as data, it has nothing to do with the name of the substituted variable. This makes it possible to 
change the variable name in the program as long as the string data is read by the string variable and the numeral 
data by the numeral variable. 

Now, from what you have learnt so far, let’s generate a data file with mixed numeric and string data. To also 
write the years when the previous composers died, for example, the following statements should be modified 
from the previous program. 


15 DIM D (5) 

65 D (1) = 1750 : D (2) = 1791 : D (3) = 1827 
67 D (4) = 1849: D (5) = 1897 

90 PRINT/T N&$ (J), D (J) 


it is clear from the above that the generated file stores string and numeric data in alternate sequence. According- 
ly, the readouts of the file must match the alternate sequence, for which statement numbers 200, 230 and 240 
should be modified as follows: 


200 DIM M$ (5), T (5) 
230 INPUT/T M$ (K), T (K) 
240 PRINT M$ (K), T (K) 


With those statements remaining unmodified, the numeric data is transferred to the string variable M$ ( ), causing 


an error to occur. 
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INPUT ‘“ HOW MANY STUDENTS !N THE CLASS? “”;N 


DIM NS$ (N), K (N), E (N) 
DIM R (N) 
A$ =*" (MARKS) ” 
FOR X=1 TO N 
PRINT : PRINT X 
INPUT ““ NAME PLEASE ? ” ; N$ (X) 
PRINT “FRENCH “ ; A$S;: INPUT K (X) 
PRINT “ ENGLISH ” ; A$ ;: INPUT E (X) 
PRINT “ SCIENCE ” ; A$ ;: INPUT R (X) 
NEXT X 
WOPEN “ RESULT ” 
PRINT/T N 
FOR X=1TON 
PRINT/T N& (X), K (X), E (X), R (X) 
NEXT X : 
CLOSE 
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<————__ For writing a data group named ‘“‘RESULT”. 
<—— Writing the number of students in the class. 


<——\——— Writing the marks for students. 


tt Writing completed. 


Now, let’s read the written data of results, and calculate the mean of individual students’ points and the mean of 
each subject. 


10 
20 
30 
40 
50 
60 
70 
80 
90 
10 
11 
12 
13 
14 
15 
16 
17 
19 
20 
21 
22 
23 
24 
Zo 
26 


ROPEN ‘‘ RESULT ” 

INPUT/T N 

DIM NS (N), K (N), E (N) 

DIM R (N) 

FOR X=1 TON 

INPUT/T N$ (X), K (X) 

INPUT/T E (X), R (X) 

NEXT X 

CLOSE 
O PRINT TAB (12) ;‘’ FRENCH” ; 
O PRINT TAB (19) ;‘‘ ENGLISH ” ; 
O PRINT TAB (27) ;‘’ SCIENCE”; 
O PRINT TAB (34) ;‘’ MEAN ” 
0 FOR X=1TON 
O PRINT N& (X) ; TAB (11) ; K (X) ; 
O PRINT TAB (18) ; E (X); 
O PRINT TAB (26) ; R (X) ; 


<___———- For finding the data group named “ RESULT ”. 
+————_ Readouts of the number of students in a class. 


+—__— Readouts of the name and marks for French. 
<____——-—— Readouts of marks for English and science. 


s+ ________———-_ Readout completed, 


O PRINT TAB (33) ; INT (10/3 X (K (X) + E (X) + R (X))) / 10 


O K (OQ) = K (0) + K (X) : E (0) = E (0) +E (X) 


O R (0) = R (0) + R (X) 
O NEXT X: PRINT“ MEAN” ; 


O PRINT TAB (11); INT (10 X(K (0) /N)) / 10; 
O PRINT TAB (18) ; INT (10 X (E (0) /N)) /10; 
O PRINT TAB (26) ; INT (10 x (R (0) /N)) / 10 


0 END 
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This data file is indispensable to generate a ‘Music 
Library’’ as discussed in the paragraph ‘‘MUSIC 
Statement”’, 

Data for tunes is string data consisting of various 
symbol groups. if a data group is named per tune, 
any tune can be picked out of those recorded on the 
tape when tts name is designated. 


For example, a tune can be picked up from this music 
library for use in the music box of your timer, with 
some modifications. The tunes in the music library 
can also be used for programs of games and graphics, 
providing a number of applications. 


To write the etude of F. Kroepsch used on page 87 
into a date file, the following changes mus be made: 


300 WOPEN ” ETUDE ” ; 
310 PRINT/T J1$, J2$, J3$, N1$, N2$, N3$ 
320 CLOSE 


Attention is required to the fact that the character count for data writing should be within 255 characters. If 
written as follow; 


305 MA$ = J1$ + J2$ + J3$ : MBS = N1$+N2$ +N3$ 
310 PRINT/T MA$, MBS 


the contents of string variables MAS and MB$ exceed 255 characters, which make data writing incomplete. 


The length of string data may vary with each tune, therefore it is neccessary to write data indicating the end of 
each tune so that a data error does not occur in data readouts. End mark of tune “ [UB ’’, for example, makes 
each tune consist of string data within 100 characters for execution given below: 


500 ROPEN * PUPPY WALTZ” 

510 FOR A=1 TO 100 

520 INPUT/T M$ (A) 

530 IF M$ (A) ="S0M" THEN 550 
540 NEXT A 

550 CLOSE 


This can read the “Puppy Waltz’’ completely. 
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The computer’s splendid memory makes it easy to compile 
a list with a number of items. The sequence of items as 
data, for example, name, age, date of birth, present address 
and permanent address, is brought into memory. This is 
called a data bank. 

This data bank makes it simple to retrieve and sort out 
items depending on the type of program. Retrieving is 
made for all the data related to any required items assigned. 
For example, a blood type is assigned to retrieve all people 
of the same blood type, and this is called ‘‘retrieving by 
blood type’. In addition, with an eye to a certain item, 
names are arranged in ABC order, for example, or ages are 
arranged in the order of the young to the old. This is 
called “‘sorting’’. 


Data, when collected in great mass, 
can play an incredibly important 
role in work. 


What kind of data do you 
want to know about Mr. 
Jones? 


| want to know data 
on Mr. Jones. 


A data bank can generate a 
number of things if used 
properly. 


DATA IBANIK 


Pal 


You are quite right. The selection 
of desired items can be very 
convenient. 
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With the above understood, a summary is made of the program in which string data is put into the memory of 
the DATA statement. Based on this program, modifications are possible so that the address and postal code are 
also avilable. 


10 N=12 

20 DIM M$ (N) + Surname 

30 DIM N$(N) + First name 

40 DIM A$ (N) * Home dialling code 

50 DIM B$ (N) — Home telephone number 
60 DIM C$ (N) * Work dialling code 

70 DIM D$ (N) Work telephone number 
80 DIM F (N) 

90 FOR K=1 TON 

100 READ M$ (K), N$ (K) 

110 READ A$ (K), B$ (K) ~<@& Data readouts 
120 READ C$ (K), D$ (K) 

130 NEXT K 

140 PRINT : PRINT : X =O 

150 PRINT “WHAT tS THE SURNAME "”; 
160 INPUT x$ + Key-in the name to be retrieved. 

170 FOR K=1 TON | 

180 IF M$ (K)=X$ THEN X=X+1:F (X) =K = Retrieving by use of the surname. 
190 NEXT K 

200 IF X<>0 THEN 240 

210 PRINT ‘““NO RELEVANT PERSON FOUND! ” 

220 PRINT “ PLEASE RE — ENTER ” 

230 GOTO 140 

240 PRINT : PRINT 

250 FOR K=1 TO X 


260 L=F (K) + For display of persons with the same surname. 
270 PRINT “ NAME ” ; TAB (11); : “; NS9(L);7“ ”;M$ (L) 

280 PRINT ‘“ HOME NUMBER: ”; 

290 PRINT “ (“;A$(L);") ;:BS$ (L) 

300 PRINT “WORK NUMBER: ”; 

310 PRINT “(” ;C$(L);") “” ;D$ (L): PRINT 

320 NEXT K 


330 GOTO 140 

340 DATA JONES, JOHN, 01, 364 9617, 01,969 3678 
350 DATA DAVIS, PETER, 021, 396 2137, 01, 323 6146 
360 DATA SMITH, PAUL, 0449, 73246, 0449, 71277 

370 DATA JONES, DAVID, 061, 631 1235, 061, 312 1975 
380 DATA RICHARDS, ROBIN, 0273, 61976, 0903, 47216 
390 DATA SMITH, HARRY, 01, 638 2174, 29, 147636 
400 DATA LAKE, COLIN, 4967, 13642, 4967, 32132 

410 DATA WATSON, JOHN, 01, 961 2431, 0427, 21369 
420 DATA CARTER, DAVID, 6317, 21974, 01,316 2638 
430 DATA HOMLES, FRANK, 2238, 76194, 2238, 78352 
440 DATA JONES, FRED, 9743, 61665, 01, 424 6913 
450 DATA WILSON, JAMES, 01, 692 5687, 0374, 68421 
460 END 
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The Morse code was invented by Samuel F. Breese 
Morse, an American artist, in 1838, and is one of the 
most important communications media even today. 

The principle is simple. It sets up the ratio of times 
when a specified wave of frequency is produced and SOS should be like this 


not produced. SS Sa ee 
but in the emergency call 
it can be done without 


gaps like this 


Transmission of sound 3 
times as long as_ short 


Prolonged sound 


sound. 

Short sound — 

Pause No sound for the same 
period of time as short 
sound 


The Morse code is based on the combination of these 
three sounds to represent the necessary symbols. 
Shown below is part of the Morse code, according to 
which try to strike SOS. Very difficult ? The Morse 
code requires practice until your fingers move 
naturally and quickly without thinking of where to 
press. 

To make this easy, the program for the Morse code is 
generated in the following section. Statement 
numbers 20 to 270 are strings to generate signals 
from A to Z, and statement numbers 290 to 380 
for those from 0 to 9. Brief description is given of 
the program. 


[_)A5————_ Sound A (la) in the high frequency range with its tonal length of 5 (equivalent to the 
prolonged signal of the Morse code). 


[A2 ———-> Sound A (la) in the high frequency range with its tonal length of 2 (equivalent to the 
short signal of the Morse code). 


R2————_—-® Pause with no sound with its length of 2. 
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10 DIM A1 (100), M$ (127) 

20 M$ (65) = “TJIA2R2(Z0A5 ” 

30 M$ (66) = “CJA5R2TMA2R20A2R27A2 ” 

40 M$ (67) = “CIAS5R2MA2R2MA5R27A2 "’ 

50 M$ (68) = “LIA5R2TA2R2(A2 ”’ 

60 M$ (69) = “TIA2” 

70 M$ (70) = “TJA2R2Z0A2R2CA5R27A2”’ 

80 M$ (71) = “CJA5R2CJA5R2ZA2 ” 

90 M$ (72) = “TIA2R2TMA2R2MA2R2CTA2 ” 

100 M$ (73) = “LIA2R2MA2 ” 

110 MS (74) = “CJIA2R2(JA5R2(3A5R27A5 ”’ 

120 M$ (75) = “CIA5R2(A2R2(C1A5” 

130 M$ (76) = “LJIA2R2TJA5R27] A2R2MA2 ” 

140 M$ (77) = “COIA5R2C1A5 ” 

150 M$ (78) = “CIA5R2(A2 ” 

160 M$ (79) = “CIA5R2CJA5R2CIA5 ”’ 

170 M$ (80) = "CJIA2R2(TA5R20)A5R20A2 ”’ 

180 M$ (81) = “CJIA5R2CIA5R2CIA2R2(A5 ” 

190 M$ (82) = "“LJIA2R2(A5R2TA2 ” 

200 M$ (83) = “TJA2R2TA2R27A2’’ 

210 M$ (84) = “CIAS”’ 

220 M$ (85) = "CIA2R2MA2R2CA5 ” 

230 M$ (86) = “LJIA2R2-JA2R27A2R2(7A5 ” 

240 M$ (87) = "“TLJIA2R2TMA5R2CIA5 ” 

250 M$ (88) = “LIA5R2TJA2R2CJA2R2(A5 ” 

260 M$ (89) = ""CIA5R2TIA2R2TA5R2(0A5 ” 

270 M$ (90) = "CIA5R2CA5R2CMIA2R20A2 ” 

280 REM NO. 

290 M$ (48) = “TIAS5R2(JA5R2ZA5R2CA5R20A5 ”’ 
300 M$ (49) = “TA2R2CA5R2CJA5R2C)JA5R2(7A5 ” 
310 M$ (50) = “CIA2R20JA2R2C)A5R2(JA5R2(A5 ”’ 
320 M$ (51) = "TA2R2[IA2R2C0JA2R20A5R20A5 ” 
330 M$ (52) = "CJA2R2TMA2R2(A2R2CTIA2R2(CA5 ” 
340 M$ (53) = "TCIA2R2TA2R2TA2R2CMA2R2C7A2 ” 
350 M$ (54) = "LJIAS5R2TA2R2CJA2R2TA2R27A2 ” 
360 M$ (55) = "TIA5R2CJA5R2CTIA2R27A2R2(A2 ” 
370 M$ (56) = "“LJA5R2CTA5R2CJA5R27A2R2DA2 ” 
380 M$ (57) = “TCOA5R2TIA5R27AS5R27A5R20A2 " 
390 REM "’ SPACE ” 

400 M$ (32) = ” R5” 

1000 INPUT ’ TYPE IN A MASSAGE ”; A$ 

1010 FOR J=1 TO LEN (A$) 

1020 Ai (J) = ASC (MID$ (AS, J, 1)) 


1030 NEXT J e€ 
1040 FOR J=1 TO LEN (A$) 

1050 MUSIC M$ (A1 (J), “ R5” da-de-da da 
1060 NEXT J 


1070 GOTO 1000 


Key in alphabet from A to Z and munerals from 0 to 9. For example, when you key-in “| LOVE YOU”, the 
Morse code will be generated accordingly. Using the Morse code, you can declare your love to your sweetheart! 
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At the end of this guide to the BASIC Language, the program for the ‘‘Perpetual Calendar” is introduced. It 
requires no detailed explanation. Our “‘time’’ continues eternally. 


5 DIM M$ (12), W$ (7) 

10 FOR K=1 TO 12: READ M$(K): NEXT K 
20 FOR K=1 TO 7: READ W$(K) : NEXT K 
30 INPUT “YEAR PLEASE ? ";Y: INPUT “MONTH PLEASE ? ”:MT 

40 H=MT: GOSUB 400: K2= YB +1 

50 H=MT+1:GOSUB 400: K1=YB+1 

60 N=K1—K2:IF N>=0 THEN L=28+N:GOTO 70 

65 L=35+N 

70 IF MT =12 THEN L=31 

75 PRINT “f@:GOSUB 190 

80 PRINT TAB (8);Y;" ‘:M$ (MT): PRINT: T=2 

90 FOR N=1 TO 7:PRINT TAB (T); W$(N);:T=T+4:NEXT N: PRINT 
100 T=0:1F K2=0 THEN 120 

110 FOR N=1 TO K2:PRINT TAB (T) ;:T=T+4:NEXT N:T=T-—4 
120 FOR N=1 TO L: N$=STR$ (N) : J=LEN (N$) 

130 PRINT TAB (T+5—J):N$::T=T+4 

140 IF T=28 THEN T=0: PRINT 

150 NEXT N 

160 IF T<>0 THEN PRINT 

170 GOSUB 190 

180 PRINT “E3’: GOTO 30 

190 FOR Z=1 TO 31: PRINT” X”:: NEXT Z: PRINT : RETURN 

200 DATA JAN, FEB, MAR, APR, MAY, JUN 

210 DATA JUL, AUG, SEP, OCT, NOV, DEC 

220 DATA SUN, MON, TUE, WED, THU, FRI, SAT 

230 END 

400 X=Y 

410 N=H-3:J=12:GOSUB 600: MM=Z 
420 IF MM>9 THEN X=X—1 

430 N=X:J=400:GOSUB 600: X =Z 
440 X4 = INT (X/4) : X1 = INT (X/100) 

450 KY =X +X4—X1 

460 N=MM:J=5: GOSUB 600: MZ=Z 
470 M5 = INT (MM/5) : M2 = INT (MZ/2) 
480 N=MZ:J=2:GOSUB 600:P=Z 
490 KM =13*M5+5*M2+3xXP 

500 N= KY +KM+3:J=7:GOSUB 600: YB=Z 
510 RETURN 

600 REM Z=N, J 

610 K = INT (N/J) 

620 Z=N—KxXJ 

630 IF Z2<O THEN Z=Z+J 
640 RETURN 
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If you are interested in space, including astronomy and manmade satellites, you might like to try calculations and 
graphic drawings by using the computer. Shown below are equations and values required for such attempts. 

Unlike the earth, the movement of objects in space should match mathematical calculations without any com- 
plexity caused by atmospheric resistance. For more accurate values, however, consideration must be given to the 
effects by the planets, the perturbation caused by strains in the form of the earth and gas pressure in space, even 
though rarefied. There is air of 109 mmHg at an altitude of 800km in space, for example. In addition, a man- 
made satellite stationed at an altitude of approx. 36,000km tilts approximately 1 degree per year in its orbit being 


affected by other heavenly bodies. 


Motion velocity of a satellite in 
circular orbit 


Period 
Circular 


orbit 


R: Radius of the earth 
h: Height from the earth surface 


Motion velocity of a satellite in 
oval orbit 


Period 


Long radius 


Short radius 


Eccentricity 


696 000km 


(m/s) 


T= 27/6. mM (s) 


G =6.67x10~"! 
Universal gravitation constant 


(N * m?/kg’) 


M : Mass of the earth (kg) 
r : Distance from the earth’s center to satellite (m) 
2 1 
v= G-M(- =) (m/s) 
3 
* a 
— oe eid 
b = Ja? —(a-°e)’ (m) 
e = OF/OP = Ja? —b’? 
a 
Ip =a (1 _ e) (m) 
rq = al(i+e) (m) 


Eset ea rence oR 


Mercury 0.57910 x 10 8km 
Venus | 24aexio® | 6056 | 0.00678 1.08210.” 
Earth 1.49600 _” 
Mars 2.27944 
Uranus 23 700 28.7103” 
Neptune 44.971" 
Moon 0.0549 * 384 400 km* 


Mass of the Sun = 1.991 x 10 29 kg 


* Value to the earth 


Source: Chronological Table of Science 
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Direct mode 


LOAD LOAD Reads BASIC program stored on cassette tape. 
Since no file name is given, in this case, the pro- 
vs File name gram first found is read. 
LOAD “NAME” Reads BASIC program with file name of ‘‘NAME”. 
(File name is valid up to 16 characters.) 
SAVE SAVE Writes program presently stored in computer to 
¢———_ File name cassette tape. 
SAVE “‘NAME’’ Similar to the above, writes program with file 
name of ““NAME”’, 
VERIFY VERIFY Compares program presently stored in computer 
and BASIC program written on cassette tape. 
File name In this case, program first accessed on tape is 
VERIFY “NAME” compared. 


Similarly, Compares program stored in computer 
and program with file name of ‘‘NAME’’. 


CLR CLR Zeroes all numeric variables and clears all string 
10 CLR variables. This can be used during program ex- 

ecution. 
RUN RUN Executes program. In this case, however, there's 


no statement number and the smallest statement 
number is first executed. 

RUN 100 Execution begins at statement number 100. 
if an unused statement number is assigned an error 
occurs. (RUN also zeroes all variables) 


LIST LIST Displays all programs stored in the computer on 
the TV screen. 
LIST 70 Displays program only at statement number 70. 
LIST 70— Displays all programs from statement number 70. 
LIST 70 — 100 Display programs from statement numbers 70 to 
100. 
LIST — 100 Display programs up to statement number 100. 
LIST/P LIST/P Performs functions to LIST to the printer. 
LIST/P 70 (This causes an error in a computer configuration 
LIST/P 70 — 100 without a printer.) 
LIST/P —100 
NEW NEW Clears program presently stored in computer, and 
10 NEW make all variables 0 or space. This can also be 


used during program execution. 


CONT CONT When program execution is stopped (with BREAK 
key or STOP and END statements during program 
execution), this command restarts execution from 
the stop position. (If program is edited using 
statement numbers, this command cannot be used. 
The direct mode command can be used. } 


BYE BYE Stops the use of BASIC instructions, and returns 
10 BYE to monitor control. This can be used during 
program execution. Use with caution !! 


104 


" ~ wae ETT aye peeeeore SSB ag i AON SU A TO SN ELA an gp CORA a ARS ee ah CS HTN REET ts SG SPAT LOI Scenic RNONCB Sete RATE A Rs Sit OF ye te Haar 8D a7 
Pe a ee Stites Sa engcen sings SPs Peek he te 2 ES eee eee Reve on eaves ep Sete ak ie See aRsiaa REISS! Spates Rah ees ee ean oho he Siar ped a aan ae ¥ Cie 
See ag P88 Bete wy Awe oe BP EY a eS, ates ads BEY! Feces PCTS Ores Fe as TP macy t o2 te eet Rael Se ae Bere su Salers, és sy 2 Rar es fi 
CE BE ce nase Re SED ares fe al GE rr aS ci inane Sats i ia 


GOTO 


GOSUB 


RETURN 


ON. 


ON.. 


.. GOTO 


. GOSUB 


. THEN 


. GOTO 


. GOSUB 


100 GOTO 200 
100 GOSUB 700 
800 RETURN 


10 ON A GOTO 70, 80, 90 


100 ON A GOSUB 700, 800 


10 IF A>20 THEN 100 


20 IF A<>10 THEN 200 


30 IF B<3 THEN B=Bt3 


40 IF B>7 THEN PRINT B 


100 IF A>=B GOTO 10 


100 [F A=B X2 GOSUB 700 


FOR ...NEXT| 10 FOR A=1 TO 10 


STEP 


20 PRINT A 
30 NEXT A 


Jumps from statement numbers 100 to 200. 
Branches to subroutine at statement number 700. 


Ends subroutine execution and returns to next 
statement number assigned by GOSUB statement 
in the main program. 


Jumps to statement number 70 if value of variable 
A is 1, statement number 80 if value is 2, and 
statement number 90 if the value is 3. Executes 
next statement if A=QorA 2 4, 

ON includes INT, and if A is 2.7, A is regarded as 
2 jumping to statement number 80. 


Branches to statement number 700 if value of 
variable A is 1, and statement number 800 if 
value is 2. Executes next statement if A = 0 or 
A 2 3. ON includes INT. 


Jumps to statement number 100 if A is greater 
than 20. Executes next statement if A is less than 
20. 


_ Jumps to statement number 200 if variable A is 


not equal to 10. Executes next statement if A 
equals 10. 

Substitutes B + 3 value for variable B if value of 
variable B is less than 3. Executes next statement 
if B is greater than 3. 

Displays B value on TV screen if value of variable 
B is greater than 7, Executes next statement if B 
is less than 7. 


Jumps to statement number 10 if value of variable 
A is greater than that of variable B. 
Executes next statement if A is Jess than B. 


Branches to statement number 700 if the value of 
variable A is double that of variable B. 

Executes next statement if not. 

(If multi-statement follows conditional sentence, 
ON statement is executed when condition is not 
met, while IF statement shifts to next statement 
number when condition is not met, and multi- 
statement is omitted.) 


Statement number 10 states that variable A should 
be changed from 1 to 10, and the first value of A 
is 1. Statement number 20 states value of A is to 
be displayed on TV sereen, therefore 1 is on 
display. At statement number 30, the value of A 
is 2, when this loop is repeated. Accordingly, 2 is 
displayed as the value of A. Thus, this loop is 
repeated until the value of A becomes 10. (When 
the loop is ended, the value of A is 11.) 
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10 FOR B =2 TO 8 STEP 3 Statement number 10 states that value of B should 


STEP 20 PRINT Bt2 be increased from 2 to 8 by increments of 3. With 
30 NEXT the value of STEP made minus, the value of the 


variable can be decreased. At statement number 
20, B squared is displayed. Statement number 30 
is not NEXT B. In this case, however, when no 
variable is given to NEXT statement, it is com- 
bined with the nearest FOR loop. In example at 
left, FOR . . . NEXT loop about variable B is ex- 
ecuted, It is suggested that the variable name is 
given to the NEXT statement. 


This is an example of double FOR ... NEXT 
loops for variables A and B. Pay attention to the 
fact that B loop is placed inside A loop. Although 
double, triple, etc. loops are possible, inner loops 
must be enclosed by outer loops. The configura- 
tion of multi-loop is called ‘nesting’. 

In example at left, variable A is first set to 1 and 
variable B to 10. With A remaining at 1, B is 
changed from 10 to 11, 12, until it reaches 30 
under execution of loop B. At statement number 
50, value of A becomes 2 with loop B execution 
started again. 


10 FOR A=i1 TO 3 


20 FOR B=10 TO 30 
30 PRINT A, B Loop B | 
40 NEXT B 


50 NEXT A 


Loop A 


60 NEXT B: NEXT A In substitution for NEXT statements at statement 

60 NEXT B,A numbers 40 and 50, two statements at number 

70 NEXT A,B 60 shown at left can be used. However, statement 
number 70 cannot be used, causing an error to 
occur. 


READ.. DAT Substitutes constant or string placed in DATA 

statement for variable shown in READ statement. 
First READ statement reads the first value of 
DATA statement, and second READ statement 
reads the second value of DATA statement. 
Variable in READ statement and corresponding 
value in DATA statement should match the form 
of variable, with numeral for numeric variable and 
string for string variable. In addition, no equation 
can be placed in DATA statement. DATA state- 
ment can be placed anywhere in the program, but 
at the beginning or end for convenience. 

10 READ A,B,C, D in READ and DATA statements at left, values of 

20 DATA 25, —0.5, 0, 500 25, —0.5, O and 500 are substituted for variables 
A,B, C and D. 

10 READ H$, H, S$, S, D$, D In example at left, first value in DATA statement 

20 DATA HEART, 3 or string “HEART” is substituted for first variable 

30 DATA CLUB, 9 in READ statement or string variable H$. Value 3 

40 DATA SPADE, 6 is substituted for second variable H, and thus read 
one after another. 

10 READ X1$, X2$, Y$ When string includes “ , ‘’and‘’: ", it is indicated 

20 DATA“ A, B,C,D” by quotation marks. In example at left, strings in 

30 DATA “E, F, G”, ” : 16” quotation marks of DATA statement are substitut- 
ed for string variables X1$, X2$ and Y$, re- 
spectively. 
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RESTORE 


MUSIC 
TEMPO 


DEF FN 


SET 
RESET 


10 READ A,B,C 

20 RESTORE 

30 READ D,E 

40 DATA 3,6,9, 12, 15 


MUSIC “CDEFG” 


300 TEMPO 7 
310 MUSIC “DE #FGA” 


300 M1$ = “C3EGLIC” 

310 M2$ = “B3GDLIJG”’ 
320 M3$ = “C8R5” 

330 MUSIC M1$, M2$, M3$ 


100 DEF FNA (X)=Xt2-—X 
110 DEF FNB (X) = LOG (X) 
120 DEF FNC (Y) =LN (Y) 


SETA, ¥ 
RESET X, Y 


SET 0,0 

10 SET 79, 49 
20 RESET 79, 49 
30 GOTO 10 


10 FOR J=0 TO 49 
20 SET J, J 


In READ ...DATA statements, values read from 
DATA statement are shifted as READ statement 
progresses. However, use of RESTORE statement 
allows readout value to return to the first DATA 
statement. 

In example at left, values 3, 6 and 9 are substitut- 
ed by READ statement at statement number 10 
for variables A, B and C, respectively. 

Since, however, RESTORE statement is placed 
next, values to be supstituted for variables D and E 
by READ statement at statement number 30 are 
not 12 and 15, but 3 and 6 are substituted re- 
spectively. 


This states music to be automatically played. With 
a tempo assigned by TEMPO statement, a string 
(equivalent to a group of notes assigned for scale 
and duration) for a melody between quotation 
marks ‘’ in MUSIC statement is converted to 
sound for delivery through a speaker. 


Do, re, mi, fa and sol in the mid-range of the scale 
sound with quarter notes at TEMPO 4. 

At statement number 300, TEMPO 7 is assigned 
(the fastest). At statement number 310, re, mi 
and fa with # sol and la in the mid-range are play- 
ed at quarter note duration. With TEMPO state- 
ment not assigned, playing is conducted at TEMPO 
4. 

In example at left, a melody is substituted for 3 
string variables and MUSIC statement is executed. 
Melody at right on the scale 

is played. This has no TEMPO 

statement assigned, and =a 


TEMPO 4 is set for playing. = 


DEF FN defines functions. Statement 100 defines 
X?— X as FNA (X), statement number 110, logy X 
as FNB (X) and statement number 120, loge Y 
as FNC (Y). Function is limited to 1 variable. 
Function names require the form of ‘“‘variable 
( )’ as illustrated A( ),B( )andC(). 


Lights the coordinate on TV screen as assigned by 
variables X and Y of SET statement. Lights assign- 
ed by RESET statement go out. The abscissa is 
from O to 79 starting at the left of TV sereen, 
while the ordinate is from O to 49 starting from 
the upper to lower part. This means top left 
corners are O and O, and bottom right corners are 
79 and 49. (Under normal operation, TV screen 
display consists of 40 for X and 25 for Y. Please 
note.) 

Lights the top left corner point. 

Light at bottom right corner point repeatedly 
flashes at statement numbers 10 to 30. 

X and Y assignments can be made by variable, 
equation or constant. 

Program at left is for drawing a slash from too 
left corner to bottom corner on the TV screen. 


WOPEN 


ROPEN 


CLOSE 


INPUT 


INPUT/T 


GET 


PRINT 


30 NEXT 


100 
110 
120 


10 
20 


30 
40 


10 
20 


30 
40 


50 


10 
20 
30 


40 


10 
20 
30 
40 


10 


20 


10 
20 
30 


FOR J=0 TO 79 
SET J, SQR (J) 
NEXT 


WOPEN 
PRINT/T X, X$ 


WOPEN “COST” 
PRINT/T X, X$ 


ROPEN 
INPUT/T Y, Y$ 


ROPEN “COST” 
INPUT/T Y, Y$ 


CLOSE 


INPUT A | 
INPUT Ag [String 
INPUT “VALUE?” -A 


INPUT A, A$, B, BS 


ROPEN 

INPUT/T A 

INPUT/T A$ 
INPUT/T A, A$, B, B$ 


GET A 


GET A$ 


PRINT A 
PRINT A$ 
PRINT A; A$, B ;B$ 


At statement numbers 100 to 120, a parabola is 
drawn on the TV screen. SOR (J) does not always 
produce an integer, but the SET statement in- 
cludes INT, making it possible to assign any coord- 
inate. What requires attention is that when X and 
Y exceed 79 and 49, respectively, in the SET and 
RESET coordinates, X and Y turn to X — 80 and 
Y — 50, respectively. Coordinate assignment by 
minus value, or X and Y assigned by numerals 
exceeding 255 characters may cause an error to 
occur. 


Opens as a file for exclusive use with data to write 
contents of numeric variable and string variable 
onto cassette tape. (SAVE statement is available 
for program storage.) 

Similar to the above, this prepares for data of 
variable to be stored with file name of “COST”. 
(16 characters are valid for file name.) 


Opens as a file for exclusive use with data for 
readouts of numeric variable and string variable 
stored on cassette tape. (LOAD command is 
available for readouts of programs.) 

Similar to the above, this prepares for readouts of 
variable data by retrieving a data file with file 
name of ‘’COST”. 


This declares the end of using cassette tape for 
data a file. When WOPEN and ROPEN statements 
are used, the file must be closed. 


Receives numeral for variable A from keyboard. 
Receives string for string variable A from keyboard. 
Before receiving keyin from keyboard, this dis- 
plays string VALUE ?. Separating string from 
variable uses semicolon ‘‘; '’. However, ? for 
numeral is not printed again. Numeric variable and 
string variable can be used in a mixed condition 
‘when separated by acomma’”’ , ”, but the from of 
variable should be followed when received. 


Read function, identical to INPUT, from cassette 
tape. If, however, there is no data file opened by 
ROPEN statement, an error occurs. 


Receives numeral of 1 character for variable A 
from keyboard. With no key pressed in this case, 0 
is received. 

Receives 1 string for string variable A$ from key- 
board. With no key pressed in this case, A$ be- 
comes a space, 


Displays value of variable A on TV screen. 

Displays characters of string variable A on TV 
screen. Numeric and string variables can be used in 
a mixed condition. In addition, when a semicolon 
is used for separation, continuous display without 
spaces is possible. If a comma is used, display 
Starts at next position (10 characters per separa- 


PRINT/T 


PRINT/P 


SIZE 


TI$ 


TAB 


SPC 


DIM 


STOP 


END 


REM 


40 PRINT “COST=";A 


50 PRINT 


10 PRINT/T A 
20 PRINT/T A;AS$,B ; BS 
30 PRINT/T “COST=";A 


10 PRINT/P A 
20 PRINT/P A; A$,B ; BS 
30 PRINT/P “COST=";A 


PRINT SIZE 


TI$ = “102030” 
10 TI$ = 102030” 


20 PRINT TI$ 


10 PRINT TAB (X);A 


20 PRINT TAB (5) ; A$ 


10 PRINT SPC (X) ;A 
20 PRINT SPC (5) ; A$ 


10 DIM A (20) 
20 DIM B (99, 99) 


30 DIM A (20), B (99, 99) 


40 DIM C1$ (10) 


50 DIM AA (X), AB (X X 2) 


200 STOP 


999 END 


100 REM GAME 


200 REM GAME : A=30 


tion). The contents of a string enclosed by quota- 
tion marks “’ are displayed as they are. In case of a 
PRINT statement alone, a fine is fed. 


Write function, identical to PRINT, to cassette 
tape. However, an error occurs unless there is data 
file opened by WOPEN statement. 


Executes function identical to PRINT to optional 
printer. An error occurs if no printer is provided. 
This statement can be used, irrespective of 
WOPEN statement. 


Displays unused memory size (bytes) of the 
memory presently built into the computer. 


Sets internal clock to 10 hours 20 minutes and 30 
seconds AM. A number of 6 figures is used be- 
tween quotation marks ”. 

Displays the actual time of the interna! clock. 


Shifts cursor by X character space from the left 
hand on TV screen, and displays value of variable 
A. 

Shifts cursor by 5 character space from the left 
hand on TV screen, and displays character train 
of string variable A$. 


Prints X space and displays value of variable A. 
Prints 5 spaces and displays character train of 
string variable A$. 


When using variable with a subscript, the maxi- 
mum of the subscript must be declared by this 
DIM (abbr. of dimension) statement. Subscript éan 
be used with numerals from 0 to 255 (maximum). 
Subscript can also be declared by variable and 
equation in the above range. 

For variable A with subscript { ), 21 arrays from 
A (0) to A (20) are prepared. 

Variable B with double subscript ( ) can have 
10000 arrays from B (0, 0) to B (99, 99) are pre- 
pared. Previous statement numbers 10 and 20 are 
combined for declaration in the form of statement 
number 30. 

For string variable C1$ with subscript( ), 11 ar- 
rays from C1$ (0) to C1$ (10) are prepared. 

For variable AA ( ) with subscript, arrays from 
AA (0) to AA (X) and for AB ( ), arrays from 
AB (0) to AB (X X 2) are prepared, respectively. 


Stops program execution and waits for next in- 
struction. With CONT command given, this con- 
tinues program execution. 


This ends program execution, but with CONT 
command given, it executes the next program. 


This is a comment and is omited during program 
execution. The colon “’ : ” used even in REM 
statement is the separator of multi-statement, and 
30 is substituted for variable A. 


ee ——“_S__ 


109 


110 


POKE 


USR 


LIMIT 


Decimal number 
10 A=PEEK (24110) 
20 B=PEEK (C) 
(With an address in BASIC program 
assigned, 32 is always read.) 


10 POKE A, D 


20 POKE 24100, 32 


10 USR (A) 


20 USR (24150) 


LIMIT A 
10 LIMIT A 


LIMIT MAX 


20 LIMIT MAX 


String Processing Statements 


LEFT$ 


RIGHT$ 


MID$ 


LEN 


ASC 


CHR$ 


300 A$ = LEFT$ (X$, N) 


600 BS = RIGHTS (X$, N) 


900 C$ = MID$ (X$, M, N) 


100 LX = LEN (X$) 


110 LS = LEN (X$ + Y$) 


200 A =ASC (X$) 


220 X1$ = CHR$ (A) 


Converts data in assigned address 24110 to a 
decimal number and substitutes it for variable A. 
Converts data in address assigned by variable C 
{regarded as decimal number) to a decimal 
number, and substitutes it for variable B. (Varia- 
bles A and B are both set between O and 255.) 


Numerals (range of 0 to 255) indicated by variable 
D are stored in memory address assigned by 
variable A. Using POKE statement without care 
may cause the program to be destroyed. 
Therefore, don’t use POKE statement when you 
are not sure about where to store it. In example, 
data 32 is stored in address 24100. ) 


Shifts program control to memory address indicat- 
ed by variable A. Fulfils the same function as sub- 
routine call in machine language. This requires 
knowledge of machine language, and sufficient 
understanding needs to be obtained before actual 
use. 

Also, shifts program control to address 24150. 


Specifies memory limit usuable by BASIC program 
with variable A. When the above USR statement is 
used, it is convenient to secure a space region in 
the memory using this LIMIT statement and to 
store there the machine language program. 
(When the power is turned on, the memory limit 
is automatically set to the maximum memory.) 
Sets the memory limit to the maximum. When the 
memory limit is particularly set at the above 
statement number 10, memory can be returned to 
its maximum by using this statement. 


Substitutes the first to Nth character of string 
variable X$ for string variable A$. N can be either 
constant, variable or equation. 


Substitutes the last N characters of string variable 
X$ for string variable B$. N can be either 
constant, variable or equation. 


Substitutes the N characters from Mth character 
of string variable X$ for string variable C$. M and 
N can be either constant, variable or equation. 


Substitutes character length (No. of characters) of 
string variable X$ for variable LX. 

Substitutes the character length sum of string 
variables X$ and Y$ for variable LS. 


Substitutes value of ASCII code (decimal), for the 
first character of string variable X$ for variable 
A. 


Contrary to ASC statement, this substitutes ASCII 
code character equal to value of variable A for 
string variable X1$. A can be either constant, 
variable or equation. 


VAL 


STR$ 


400 K = VAL (N$) 


440 N$ = STR$ (K) 


Functions 


ABS 


SGN 


INT 


SIN 


COS 


TAN 


ATN 


100 A=ABS (X) 


100 A=SGN (X) 


100 A=INT (X) 


100 A=SIN (X) 


110 A=SIN (30 X 7/180) 


200 A=COS (X) 


210 A=COS (200 X 7/180) 


300 A=TAN (X) 


310 A=TAN (Y X 2/180) 


400 A=ATN (xX) 


410 A= 180/ 7 x ATN (X) 


Substitutes: numeric string of string variable N$ for 
variable K as value. 


Contray to VAL statement, this substitutes 
numeral of variable K for string variable N$ as 
string. 


Substitutes absolute value [XI of variable X for 
variable A. Parenthesis can be either constant or 
equation. 
Example: ABS (-—3) = 3 
ABS (12) = 12 


Substitutes —1 if value of variable X is <0, Oif X 
= 0, and 1 if X > 0, for variable A. 
Parenthesis can either be constant or equation. 
Example: SGN (0.4) =1 
SGN (0) =0 
SGN (—400) = —1 


Determines maximum integer not exceeding X of 
value of variable X, and substitutes it for variable 
A. Parenthesis can either be constant or equation. 
Example: INT (3.87) =3 
INT (0.6) =O 
INT (—3. 87) = —4 


Determines sin X value for value of variable X 
(radian) and substitutes it for variable A. Paren- 
thesis can either be constant or equation. 

Since the relationship between the radian and 
degree is, 


i us : 
1 degree = 780 radian 


the substitution of sin 3C° for variable A, for 


example, should be made as at statement nunrber 


110. 


Determines cosX value for value of variable X 
(radian), and substitutes it for variable A. Paren- 
thesis can either be constant or equation. Calcula- 
tions in degrees can be made ina similar manner to 
SIN function. Statement number 210 is to sub- 
situte value of cos200° for variable A. 


Determines tanX value for variable X value 
(radian) and substitutes it for variable A. Paren- 
thesis can either be constant or equation. Calcula- 
tions in degrees can be made in a similar manner to 
SIN function. Statement number 310 is a state- 
ment for substitution of tanY° value for variable 
A. 


Determines tar’ |! X value (radian) for variable X 
value and substitutes it for variable A. 
Parenthesis can either be constant or equation. 


: ' tT 1 
Calculation result is the value between =) and z- 


Statement number 410 is a statement for conver- 
sion of tan"!X value to degrees and substitutes it 
for variable A. 


172 


SOR 


EXP 


LOG 


LN 


RND 


Arithmetic Operators 


I 


—, 


+ 


100 A =SOQOR (X) 


100 A= EXP (X) 


100 A=LOG (xX) 


100 A =LN (xX) 


110 A=LOG (X)/LOG (Y) 
120 A=LN (X)/LN (Y) 


100 A=RND (0) 
110 B= RND (-3) 


200 A=RND (1) 
210 B = RND (10) 


10 A=X+3 (Substitution) 
20 B=T 


10 A=X Tt Y (Power) 


10 A=-B (Minus sign) 


10 A=X X Y (Multiplication) 


10 A=X/Y = (Division) 


10 A=X+/Y (Addition) 


10 A=X — Y (Subtraction) 


Determines square root of X for variable X value 
and substitutes it for variable A. Parenthesis can 
either be constant or equation, but value must be 
plus or O, 


Determines value of e* (e to the Xth power) for 
variable X value and substitutes it for variable A. 
Parenthesis can either be constant to equation. 


Determines comman logarithms log,.X value for 
variable X value and substitutes it for variable A. 
Parenthesis can either be constant or equation, but 
must be a plus value. 


Determines natural logarithms logeX value for 
variable X value and substitutes it for variable A. 
Parenthesis can either be constant or equation, 
but must be a plus value. To determine logarithms 
logy X with bottom of Y, statement number 110 
or 120 can be used. 


This function generates random numbers with 
values from 0.00000001 to 0.99999999. There are 
two ways of processing, one with O or minus in 
teger given in parenthesis and the other with 
plus integer given. 

With O or minus integer given in parenthesis as at 
statement number 100 or 110, random number 
generation is initialized to generate a specified 
value at all times, and the same value is substituted 
for both A and B. With plus integer given in the 
parenthesis as at statement number 200 or 210, 
random number with value between 0.00000001 
and 0.99999999 is generated, whenever RND 
function is used. In this case, however, this has 
nothing to do with the value of plus integer given 
in the parenthesis. 


Numeral white on black base at left shows calculation priority order. 
Calculations in parentheses are further given priority. 


Substitutes 3+ variable X value for variable A. 
Substitutes a (3.1415927) value for variable B. 


Substitutes calculation result of X” for variable 
A., (However, if X fT Y with X of minus value 
and Y of no integer, an error occurs.) 


O —B is a subtraction, but ‘““—” of —B is a minus 
sign, so please note. 


Substitutes product of X and Y values for variable 
A. 


Substitutes quotient of X and Y values for variable 
A. 


Substitutes total of X and Y values for variable. 


Substitutes remainder of X and Y values for 
variable A. 


Logical Operators 


= 10 iF A=X THEN... 


20 IF A$="XYZ" THEN... 


(Equal) 
<> 10 1F A<> X THEN... 
or >< (Not equal) 
= 10 IF A>=X THEN... 
or => (Greater than or equal) 
i 10 IF A<=X THEN... 
or =< (Less than or equal) 
*x 10 IF (A> xX) X(B> Y) THEN 


(Logical multiply) 


+ | 10 1F (A>X)+(B>Y) THEN... 


(Logical add) 


Other Symbols 


? 200 ? “A+B=";:;A+B 
210 PRINT “A+B=";A+B 
220 A=X:B=XT2:PRINTA,B 


230 PRINT “AB” : “CD Em 


240 INPUT “X="; X$ 


, 250 PRINT “AB”, “CE”, “E” 


260 DIM A (20), B (30) 


* 270 A$= ‘SHARP BASIC” 
280 PRINT “XK; A$ ;" XK" 

$ 290 A1$ = LEFT$ (AG, 5) 
300 A2$ = “MZ — 80 K” 

7 400 S =SIN (X X 2/180) 
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Executes statement after THEN if variable A and 
X value are equal. 

Executes statement after THEN if the contents of 
string variable A equal string XYZ. 


Executes statement after THEN if variable A and 
X value are not equal. 


Executes statement after THEN if variable A is 
greater than or equal to X. 


Executes statement after THEN if variable A is 
less than or equal to X. 


Executes statement after THEN if variable A is 
greater than X and variable B is greater than Y. 


Executes statement after THEN if variable A is 
greater than X or variable B is greater than Y. 


This can be used in substitution for PRINT state- 
ment. Therefore, statement numbers 200 and 210 
are identical. 


Symbol representing pause in statement and is 
used for multi-statement. The multi-statement at 
statement number 220 includes 3 statements. 


Executes PRINT statement continuously. At 
statement number 230, ‘‘ABCDE”’ is displayed on 
TV screen without space. R 


Displays ‘‘“X="’ on TV screen, and waits for string 
variable X$ to be keyed - in. 


Executes PRINT statement with tabulation. At 
statement number 250, this displays AB first on 
TV screen, then CD at the position 10 characters 
to the right from A and finally E at the position 
10 characters to the right from C. 


Example in which the comma is used for variable’s 
separation. 


Indicates that a string ts between quotation marke 


ae v? 


Indicates string variable. 


Circular constant 3.1415927 is represented by 7. 
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In case an error occurs during computer operation, an error message is sent from the computer to the TV screen 
in the following forms: 


(1) This type of error occurs particularly during the compilation or modification of a program, and the 
message is sent when the error is regarded as nothing to do with statement numbers. 


(2) This error message is sent when an error is regarded as occuring in statement number XXXX specifical- 
ly during program execution. 


In addition, the following are types of error to be displayed. 


SYNTAX 


This occurs when there is an error in the program syntax. 


MEMORY 


When memory usable as a program is exceeded. 


DATA 
The range of data that can be handled by the computer is exceeded. 


MISSMATCH 


When variable for numerals and variable for strings are used in a mixed condition. 


16FOR 
When 16multi-loops or more are used for FOR-NEXT loops. 


16GOSUB 


When 16 or more levels of subroutine are used. 


6FN 


Another function definition can be used in the DEF FN function definition. However, when this multi- 
definition exceeds 6, an error occurs. 


CONT 
Even after STOP and END statements have been executed or a program execution is stopped by pressing 
the BREAK key, the program execution can be continued by the CONT command to re-start from the 
stop position. When the CONT command is used in any other cace, or the program is edited after it has 
been stopped, this error occurs. (Direct mode instructions, such as PRINT and LIST commands can be 
used in the above case.) 
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When substances are changed through nuclear reaction into energy, their mass decreases by that much. The sun 
changes hydrogen into helium through nuclear fission to generate 9 x 107° calories of heat. The mass lost at 
that moment is 4 million tons. The sun grows us creatures while getting lighter. In fact, however, its energy 
radiating the earth, regarded as the only planet with creatures, is about 1/2 billionth of the sun’s total. Yet, 1/3 
of the energy radiation the earth is reflected into space. On earth, today, people are suffering from the shortage 
of energy for effective use. What a waste! 

Nuclear Fission of the Sun 
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564 million tons of hydrogen is changed into 560 million tons of helium per second 
to generate 9 x 107° calories of heat. 


1/2 billionth of that energy reaches the earth. 


To space 
Reflected in space 
aA 
=? 
yy eae To _ sea 
Energy reaching the earth: 0.02% or the total 
? G ‘ energy is used for 
- 45,000 000,000 ,000 ,000 calories/second photo-synthesis. 
~~ Earth To the land 
> 
<— approx. 150 million km 
To air 


Energy for rainfall, 
wind and waves 
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represents a space or blank. 


96 
97 
98 
99 
100 
101 
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103 
104 
105 
106 
107 
108 
109 
110 


111 | | 
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113 
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115 
116 
117 
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160 
161 

162 
163 
164 
165 
166 
167 
168 
169 
170 
171 

172 
173 
174 
17S 
176 
177 
178 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
189 
190 
191 
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193 
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196 
197 
198 
199 
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201 
202 
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204 
205 
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207 
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209 
210 
211 
212 
213 
214 
215 
216 
217 
218 
219 
220 
221 
222 
223 
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224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
250 
251 
252 
253 
254 
255 
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UE 


"" has been executed. The MZ-80K has 6 such codes based on the decimal 


' BASIC and TEXT areas (Basic configuration) 


Cursor shifts to top left corner on TV screen. (home) 


The following special codes function to shift the cursor, set home and clear the TV screen when the PRINT 


When BASIC is installed with RAM standard specifications, the area partitions are as outlined below: 


O 
® 
@® 
5) a § 
Bo * 8 
‘?,) © ed ” = 
® o o) © co <= 
jr xt v7; o 
4 0 ~ Had © 1) 
io @® i] a rT) co aL 
S © o = © a 
= is] @ x rom 
179 gs = 2 = < so c 
f- £ -_ * 'e) \e) Ee S 
12. = 2 4 5°. = © 
41 ¢ > an = £ —_ "oH © = 
o) \§ 22S 5 OS 2 S = 
5°) 18 2 9 9 , +s : z 
xe) a pu — re) o © < = = 
fe) : ; 5 (OS 5 ‘ 
oso Po # oO a. w” @ <x ray 
Cc) == = = “a = = > cc . 
LL 
“a : 1S 3 a % a £ 2 e 9 oD 
den = = en C - om 
@O Bs 9 0 9 § EE O Oo = = G 
= = ©£ Ff &£ A = = = > > 
— Ss =a oo a 
© 40 ©O CO © O Se Ae ee 
4) = 
, 2 ‘or ” 
pues “a 
4) s 4} @ 
pln = 5S 
c> ge PEaehto SF 3 
—— r= 
O 2 c 3 
O = e L 
: >) ao =) =) 
® E & So 68S 8 fs) Eo) S Ss & ux 
oO. 3 -eeeee ob) 2 Ex 5 Oo 6 “+ 
oe ° = © QO w Ta 
~ a a > 
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The use of POKE command makes possible direct writing of 4608 
the machine language into memory address, while the USR (1200) 
statement can shift program control to a specified memory 
address. It is, however, dangerous to use the POKE com- 
mand carelessly. Look at the diagram at right. RAM area is 
assumed to range from 4608 to 24575 in decimal addresses. 
The parenthesis ( ) in the diagram indicates a hexadecimal 
address. Usually, decimal address from 4608 to 24575 is the 
BASIC and TEXT area (Top diagram). Therefore, when the 24575 


POKE command is executed under this condition, the con- (5FFF) 
tents of the already stored program are destroyed. Because of 4608 
this, using the command caselessly is dangerous. (1200) 


When using the POKE command, therefore, it is wise to ensure 
a safety memory address region. At this time, the LIMIT state- 
ment can be used. It sets the maximal memory address used in 
the BASIC instructions, and executes the following statement, 


for example. 24063 od < LIMIT 
(5DFF) 
24575 
LIMIT 24063 
(5FFF) 


This limits the maximal memory address used in the BASIC instructions to 24063. At this point, the BASIC and 
TEXT area ranges decimal addresses from 4608 to 24063, and decimal addresses from 24064 to 24575 are 
ensured as a safety region. Therefore, this area can be an assigned address by the POKE command (bottom 
diagram). This does not destroy other programs and is a very reliable method. A simple program is shown as 
follows: 


10 PRINT “@” 

20 LIMIT 24063 

30 GOSUB 100 

40 USR (24064) 

50 END 

100 FOR A= 24064 TO 24087 

110 READ D:POKE A,D:NEXT A 

120 RETURN 

130 DATA 197, 213, 229, 22, 0, 33, 0, 208, 1, 232 
140 DATA 3, 114, 35, 20, 11, 120, 177, 194, 11 
150 DATA 94, 225, 209, 193, 201 


This is the program for display of characters on the TV screen. Using the machine language program, the display 
code is stored in the video RAM memory. The machine language as data is written into memory by the POKE 
command. Accordingly, first use the LIMIT statement, in order to limit the maximal memory (decimal address) 
used in the BASIC to 24063. Using the POKE command, the machine language is stored into memory starting at 
decimal address 24064. 

With execution of LIMIT MAX statement, BASIC and TEXT area is put pack. 
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TV Screen Constitution 


As shown in the diagram at right, the TV screen con- 
sists of picture elements, 25 lines and 40 characters. 
Each element further consists of a 8 x 8 dot matrix. 
Such dot combinations display a certain character on 
each picture element. The picture element positions 
on the TV screen is allocated as video RAM to 
decimal addresses from 53248 to 57343 in the 
internal memory. To display a character at any 
desired position on the TV screen, keying-in is made 
using the cursor. In addition, however, the POKE 
command can also be used as described below: 

For example, displicemant % {0.< X < 999) from | ee 
memory address 53248 of the picture element at eer cnatveere Sse 
any desired position is assigned, and the display code 

for the desired character is assumed Y (0 < Y < 255). 


POKE 53248+ X,Y 


With the above command, the character is displayed 
at X position on the TV screen. 


Special Control Commands 


Including the above POKE command, the MZ-80K includes the following special control commands. 


POKE 53248 + X, Y : Displays a character corresponding to display code Y at picture element X 
position. 

POKE 4509, 0 : Entry bell sounds when a key is pressed. 

POKE 4509, 1 : Stops bell sound when a key is pressed. 

USR (62) : The bell sounds when this statement is executed. 


POWE 45039, 1 


I(t 


Sound stops with 


POKE 4509, 1. ; 


SKS 
Za 
Ay 


fi % ya yt J 
bf eg Pay hiss Ms 
j ’ 


XXSe 


Ba cated 
96 | @ | 128 


64 ra 160 | q 192 224 | 4 
33 | 9s 97 | HH | 129 | FA | 161 |} a | 193 | [| 225) FY 
3 | ce | [8] 98 | [Z| | 130 162 | Z | 194 | pe | 226 | [ff] 
35 | fey | 67 | @ | 99 | (ze) | 131 163 | W | 195 | [) [| 227) 
36 | kJ | cs | [B) | 100; K | 132 164 | § | 198 | () | 228] F 
37 69 101 | be | 133°) (J) | 165 | U | 197 |' LC] | 2200] FA 
38 | FJ | 70 102 | (¥| | 134 | K] | 166 | j | 198 230 | 
39 | fe 71 | © | 103 | @ | 135 167 | EY | 199 | [] | 231 | If] 
40 | T@ | 72 | (| 104 | © | 136 168 | C | 200 | [] | 232 | [ 
41 | BY 73 | A | 105 | w | 137 169 | k | 201 233 
42 74 106 | DB | 138: | CJ | 170 | ‘f 202 | |} | 234 
43 75 107 | 44 | 139 | gb | 171 | ve} 203 | (A I 235 
44) | 7 108 | K' | 140 | A] | 172 | {I} | 204 | fe} | 236 | OO 
45 | @™ 77 1o9 | K; | 141 | CY | 173) G | 205 | (8 | 237 | | 
46 | 78 110 | 4k | 142 174 | f3 | 206 | G] | 238) Y 
47 790 | (@) oat | EY aa | HW) |] 175 | J | or | | 239 | 2 
48 fe} | so | | 112 | BS | 144 | @ | 176 | *N | 208 | [A | 240 | 
49 s1 | @) | 113° (RB | 145 | BR] 177) 7] | 29 | Dl amalig 
50 s2 (A) 14 «| 146) eA | 178 | UL | 210 | A | oe | 
51 83 | By | 115 | FL 147 179 | M | 211 | A] | 243; 
52 84 116 | Ba | 148 180 | L4 | 212 | [] | 244] [] 
53 85 17 | By | 149 | BB |) 181 | A | 213 | BO | 245 
5 | fa | 86 118 | | 150} t | 1892) | | 214 | Ch | 246 
55 s7 | MY |) 19) OB) | 151 | Q | 183: | O | 215 | | 247 
56 | Fs} | 3s 120 | [a | 152) KA 184 | | | 216 | BM | 248 | BY 
57 | fS) | 89 121 | &J | 153 | (A | 105 | A | 217 | GJ | 249 | OO 
58 | [| sg90 122 | (¥Y | 154] 6 | 18) O | 218 |] CJ] | 20) & 
59 91 123 o | 155 | X 187 | @ | 219 251 
60 92 124 156 | G | 188 | KJ) | 220 | BO | 252 
6. | S| 93 125 | [A | 157 | fr | 199 | Y | 221 | Fl | 253 | [OL 
62 94 126 | Z|] | 158 | DP | 190 222 | My | 254 
63 95 127 159 | C | 191 | (N | 223) gw | 255 | 


Note: The code is based on the decimal system. represents a space. 
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LDer 
LDr,n 


LD r, (HL) 


LOr, (IX +d) 


LD r, (IY +d) 


LD (HL),r 
LD (IX +d),r 


LD (IY +d), r 


LD {HL), n 


LD (IX +d),n 


LO (IY +d),n 


LDA, (BC) 
LD A, (DE) 
LD A, (nn) 


LD (BC),A 
LD (DE), A 
LD (nn), A 
LDA, | 
LDA, R 


LDI,A 


LDR,A 


r<r’ 


r <2 


r< (HL) 
r< (IX +d) 


r<(lY +d) 


(HL)}<r 
(IX +d)<tr 


(4Y¥ +d)<r 


(HL) <n 


(IX +d)<n 


(IY +dj<n 


A <{BC) 
A<(DE) 
A< (nn) 


(BC)<A 
(DE)<A 


(nnh<A 


R<A 


00 r 110 
< n-> 
01 r 110 
11011101 
01 r 110 
<+ d- 
11111101 


01 r 110 
<d > 


01110 fr 
11011 101 
01110 r 
<_- d-> 
11111101 
01110 r 
<- d- 


00 110110 
<“ on —> 


11011 101 
007110110 
<-da- 
<- on —_ 
11111 101 
00110110 
-m oc +> 
< n -> 
00 001 010 
00 011 010 
00 1171 010 
—- jn “ee 
- nan + 
00 000 010 
00 010 010 
00 110010 
<- n -> 
<- n > 
11 107 101 
01 010 111 
11 101 101 
01011117 
11101 101 
01 000 111 
11 101 101 
07 001 111 


LD dd, nn 


LD IX, nn 


LDIY, nn 


LD HL, (nn) 


LD dd, {nn) 


LD IX, (nn) 


LD IY, (nn) 


LD (nn), HL 


LD (nn), dd 


LD (nn), IX 


LD (nn), lY 


LD SP, HL 
LD SP, IX 


LD SP, !Y 


PUSH qq 


dd <— nn 


IX <nn 


iY nn 


H<(nn +17) 
L<(nn) 


ddy<(nn +1) 
dd; <(nn) 


IXH< (nn +1) 
IX, < (nn) 


IYH< (nn +1) 
IY; < (nn) 


(nn+1)<H 
(nnh<L 
(nn+1)<—ddy 


(nn) < dd; 


(nn+1)< IXy 
(nn) <= IX, 


(nn+1)<1Y¥y 
(nn) — IY, 


SP <HL 
SP < IX 
SP <lY 


(SP—2) < qq, 
(SP—1) <qqy 


00 ddO 011 
<n > 


<n o> 
11011 101 
00 100 001 


_“<-£ n > 


<< n —> 
11111101 
00 100 001 
<- nh => 
<< n-> 
00 101 010 
<_ n => 
< n > 
11 101 101 
01 dd1 011 
< n> 
<n > 
11 011101 
00 101 010 
< n > 
“- nn > 
11 111 101 
00 107 010 
<- on 
< n> 
00 100 010 
<_ n => 
<“n-o- 
11 101 101 
01 ddO 011 
<- n-> 
<n > 
11011101 
00 100 010 
- n > 
<n 
111171101 
00 100010 
<_—- n > 
<_- n > 
11 111 001 
11017 101 
11 111001 
11111 101 
11111001 
11 qqO 101 


sl 
i 


PUSH IX 


PUSH IY 


POP qq 


POP IX 


POP IY 


EX DE, HL 
EX AF, AF’ 
EXX 


EX (SP), HL 


EX (SP), IX 


EX (SP), 1Y 


LDI 


LDIR 


LDD 


LDDR 


CPI 


CPIR 


CPD 


(SP—2) < IX, 
(SP—1) <—IXy 
(SP—2) IY, 
(SP—1) <1Yy 
qqy< (SP + 1) 


qq, < (SP) 
IXH< (SP + 1) 
IX, < (SP) 
1YH< (SP + 1) 
IY | < (SP) 


DE@HL 
AF @ AF’ 
(BC) = (BC’) 
(DE) < (DE’) 
(HL) <> (HL’) 
H < (SP + 1) 

L < (SP) 

Xp (SP +1) 
IX, <> (SP) 
1Yy< (SP + 1) 
IY, <> (SP) 
(DE)< (HL) 
DE «DE+1 
HL <HL+1 
BC «BC —1 
(DE) — (HL) 
DE «DE +1 
HL <—HL +1 
BC <—BC-—1 
Repeat until BC=0 
(DE) —(HL) 
DE « DE —-1 
HL <HL-—1 
BC <BC —1 
(DE)<— (HL) 
DE «DE —1 
HL <HL—1 
BC <BC —1 
Repeat until BC=0 
A — (HL) 
HL<HL+1 
BC <BC-—1 
A — (HL) 
HL<HL+1 
BC «BC —1 
Repeat until BC = 0 
or A = (HL) 

A — (HL) 

HL <HL-—1 
BC «BC -—1 


11011 101 
11 100 101 
11111101 
11 100 101 
11 qqO0 001 


11011101 
11 100 001 
11111 101 
11 100 001 


11 101011 
00 001 000 
11011 001 


11 100 011 


11 011 101 
11 100 011 
11111101 
11 100 011 
11 101 101 
10 100 000 


11 101 101 
10 110 000 


11 101 101 
10 101 000 


11 101 101 
10 111 000 


11 101 101 
10100 001 


11 101 101 
10110 001 


11101 101 
10101 001 


ADDA, r 
ADDA,Nn 


ADD A, (HL) 
ADD A, (IX +d) 


ADD A, (IY +d) 


ADC A,S 
SUB s 
SBCA,s 
AND s 

OR s 

XOR s 
CPs 

INC r 

INC (HL) 
INC (IX +d) 


INC (IY +d) 


DEC m 


DAA 


CPL 
NEG 


CCF 
SCF 
NOP 


HALT 
DI 

El 
IMO 


11 101 101 


A - (HL) 

HL <HL-—1 10111001 
BC «BC — 1 

Repeat until BC =O 

or A= (HL) 


A<Atr 10[000] r 
AcAtn 11 [000] 110 
3a —> 
A —A+ (HL) 10[000] 110 
A<A+t (IX +d) 11 011 101 
10[000] 110 


_<-da-> 
11 111 101 
10[000] 110 


<- d--> 


A<A+(lY +d) 


A<A+S+CY 
A<A-s 
A<~A-—s-—CY 
A<AAs 
A<AVs 
A<A@s 
A-s 


rer +t 00 r [100 
(HL) — (HL) +1 00 110[100] 
(IX + d) 11.011 101 

<—(IX +d) +1 00 110[100] 


=- @ = 


(1Y +d) 11111 101 
<—(1Y +d) +1 00 110[100] 

<¢- ogo => 

m<m—1 


Correct decimal con- 00 100 111 

tents of A after ad- 

dition and subtrac- 

tion 

A<A 00101 111 

A<A+1 11 101 101 
01 000 100 

CY <CY 00 111111 

CY< 1 00 110111 

Nothing is executed, 00 000 000 

but PC contents in- 

cremented. | 

CPU halted 01110110 

IFF <0 11110011 

IFF <1 11111011 

Set interrupt mode 0. 11101 101 


01 000 110 


124 


RLCA 


ADD HL, ss 
ADC HL, ss 


. SBC HL, ss 


ADD |X, pp 


ADD IY,rr 


INC ss 
INC IX 


INC IY 


DEC ss 
DEC IX 


DEC IY 


RLA 


RRCA 


RRA 


RLCr 


RLC (HL) 


RLC (1X +d) 


RLC (iY +d) 


Rim 


RRC m 


Set interrupt mode 1 


Set interrupt mode 2 


HL< HL +ss 
HL< HL+s5s+CY 


HL< HL—ss— CY 
IX<IX+pp 
IY <—IV +rr 


ss <-ss + 1 
IX <+ IX +1 


Ly =—1¥ #7 


ss <-ss — 1 
IxX<IX — 1 


IY<IY -—1 


f 
| 


fa ee | 
{CY} F<O}~ 


| ote] 


00 000 111 


11 107 101 


01010110 
11 101 101 


01011110 


00 ss1 001 


11 101 101 
00 ss? 010 
11 7101 101 
01 ss0 010 
11 011 101 
00 ppt 001 
111111017 
00 rr1 001 
00 ssO 011 
11011 101 
00 100 011 
11111101 
00 100 011 
OO ss1 011 
11 011 101 
00 101 011 
11.177 163 
00 101 011 


00 010111 
00 001 111 
00011111 


11001 011 
00/000] r 
11 001 011 
00 (000) 110 
11 011 101 
11001 011 
= «a —~- 
00[000] 110 
11111101 
11 001 011 
<— d > 
00 [000] 110 


[et oe 


m 
|_7 > 6 4C YIU 


m 
CYH7< O-0 
m 
py oe Y] 101 
0-7 0} -CY; [117] 


A. fy 
7.43,0 7 43 Ol 41.101 101 
--4b 01101111 
“(A L) 0 
oe 
7 413 0) 7 4/3 0) 11.101 101 
(HL): 01 100111 


BIT B. F 11001 011 


01 b fr 
BIT b, (HL) 11 001 011. 

01 b 110 
BIT b, (IX +d) Z< (IX +d)ph 11011101 


11 001 011 
<dad-> 
01 b 110 
11111101 
17 001 011 
< d > 
01 b 110 
11 0071 011 


b of 
11 001 011 


11] b 110 
11011101 


11001 011 
<_-d-> 
fit} b 110 
11111101 
11 001 011 
<d-> 
[14] b 110 
Mp <0 [10] 


BIT b, (IY +d) 2° (¥ aly 


SET br 


ib aa | 


SET b, (HL) (HL), <1 


SETb,(IX+d) | (IX+d), “1 


SET b, (1Y +d) (IY +d), <1 


11 000 011 


<_— n = 


PC <nn 


JP ce, nn If condition cc is 11 cc 010 
true, PC <-nn — n > 

<- n > 

JRe PC <PC+e 00 011 000 
— Gis > 

JR C,e lf C = 0, 00 111 000 


Continue <—e-2? -> 
if C= 1, 


PC<PC +e 


JP (HL) 
JP (1X) 


JP (IY) 


DJNZe 


CALL nn 


CALL cc, nn 


RET 


RET cc 


RETI 


RETN 


RST p 


lf Z=0, 
Continue 
lf Z=1, 
PC< PCt+e 
IifC=1, 
Continue 
lf C=0, 
PC <PC+e 
lf Z=1, 
Continue 
lf Z=0, 
PC <PC+e 
PC< HL 
PC< IX 


PC <IY 


B<B-1 
lf B=0, 
Continue 
IifB +0, 
PC <PC+e 


(SP —1)< PCy 
(SP — 2) — PC. 
PC<nn 


if condition cc is 
true, 
same as CALL nn. 


If condition cc is false, 
continues. 


PC, < (SP) 
PCy< (SP +1) 


If condition cc is 
true, 


same as RET 


If cc is false, continues 
Returns from 
interrupt 


Return from NMI 


(SP — 1)< PCy 
(SP — 2) < PC, 
PCy <0 
PC; <P 


00 101 000 
<+e-2-> 


00 110 000 
<e-2 -> 


00 100 000 
<_-e-2 > 


11 101 001 
11 011 101 
11 101 001 
11 111 101 
11 101 001 
00 010 000 
<e-2-> 


11 001 101 
“n> 
<-“ n> 
11 cc 100 


<-“ n-> 


< n> 


11 001 001 


11 cc 000 


11 101 101 
01 001 101 


11 101 101 
01 000 101 
a. t.- 25 


IN A, (n) 


IN r, (C) 


INI 


INIR 


IND 


INDR 


OUT (n),A 


OUT (C),r 


OUTI 


OTIR 


OUTD 


OTDR 


A= (n) 
r<(C) 


(HL) < (C) 
B<B-—1 

HL <HL +1 
(HL) <(C) 
B<B-—1 

HL <HL+1 
Repeat until B=0 
(HL) < (C) 

B< B-—1 

HL <HL—1 
(HL)< (C) 
B<B-—1 

HL <HL—1 
Repeat until] B=0 
(nh—A 


be oat 


(C) — (HL) 
B<B-—1 

HL <HL +1 
(C) <(HL) 

B< B-—1 

HL< HL +1 
Repeat until B=0 
(C)< (HL) 
B<B-1 

HL< HL —1 
(C)< (HL) 
B<B-1 

HL <HL — 1 
Repeat until B=0 


11 011 011 
<“n > 
11101 101 
01 r 000 
11 101 101 
10 100010 


11101 101 
10110010 


11.101 101 
10 101 010 


11 101 101 
10111 010 


11010011 
“ n > 
11.101 101 
01 r O01 
11 101 101 
10 100 011 


11 101 101 
10 110 011 
11 101 101 


10 101 011 


11 101 101 
10111011 
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Register Pair Register Pair 


BC 
DE 
HL 
SP 
b Bit set Condition 
000 0 NZ non zero 
001 1 001 Z zero 
010 2 010 NC noncarry 
011 3 071 C carry 
A: Logical AND operation Las . TOM ii dala ‘i 
v: Logical OR operation 101 5 101 PE parity even 
@®: Logical exclusive-OR 110 6 110 P sign positive 
epeuasoe 111 7 111 M sign negative 
s:r,n, (HL), (IX +d), (IY +d) m:r, (HL), (IX +d), (IY +d) 
CY: carry flip-flop mp : bit b (0 to 7) or location m 
(Register Pair) : upper 8 bits of register (Register Pair), : Lower 8 bits of register 


Instruction code of ADC, SUB, SBC, AND, OR, XOR, CP to the mnemonic code is the contents [_) replaced by 
those of ADD groupL__] . | 
Instruction code of DEC is the content replaced by those of INC group L__] 

Similar processing is made for instruction code [__~] in rotate, shift group and bit set, reset and test group. 
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You have mastered your computer to use it as if it were part of your brains, haven’t you ? What did you say ? 
You are too busy to have time for that. Indeed, we are living in this busy world, aren’t we ? 

By the way, let’s predict, using the computer, what a busy life you are leading. Calculations are made for a life 
of 80 years that is a little longer than the English average. For education, 16 years are spent at infant school, 
prinary school, high school and university or college. 245 days a year are for going to school and 5 hours a day 
for lessons. After school, 1.5 hours are for home work every day throughout the year. After graduation from 
university, 8 hours a day for 245 days a year are for work as a salaried man with 8 hours a day for sleep. 365.24 
days a year are assumed. Based on the above, calculations are made, with results as follows: 


Hours for work 10.6% 
(74480 hours) 


Hours at school 2.8% 
(19600 hours) 


Hours for home work 1.3% 
(8760 hours) 


~~ 


Use of 
80 year Life 
(701260 hours) 


Hours for sleep 33.3% 
_£—_ (233750 hours) 


Hours for no work 
or no study though 
not asleep 52%. 
(364670 hours) 


How did you enjoy the calculations ? During a life of 80 years, studying accounts for 4.1% and working 10.6%. 
Why not analyze and predict the use of your own time for you future reference and consideration ? 
Don’t forget to add your time working on your computer. 
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2 Power Cord 
Don’t pin the power cord under a desk or chair, nip or damage it. {t is dangerous to use the 
power cord with damage of any kind. Hold the plug whenever the power cord is disconnected. 


= Power Voltage 
The computer operates on the Jocal voltage. Unstable power voltages will cause the unit to 
malfunction, resulting in incapability to give high performance, for which it is designed. For any 
problem of malfunction, consult the dealer from where the unit was purchased. 


= Ventilation 
To prevent any temperature rise, the cabinets are provided with air vents. Do not keep the unit 
in a poorly ventilated place, cover it with cloth, place it on a carpet or soft surface that could 
impede ventilation. 


= Humidity and Dust 
Make sure that the unit is free from humidity or dust, particularly bathrooms or kitchen. Such 
places could cause the unit to malfunction. 


= High Temperature 
Place the unit on any convenient location that should be out of direct sunlight and away from 
heat sources such as airconditioners, heaters. Such sources may cause the cabinets and internal 
component parts to be damaged. 


2 Moisture and Impurities 
It is dangerous to use the unit with moisture, liquid or metals, such as needles and pins included 
inside, Make certain that the unit is free from impurities. if moisture or liquid enters, unplug 
the power cord immediately, and contact the dealer from where the unit was purchased. 


= Impact or Shock 
The unit is made up of precision electronic parts. Do not drop, hit or give any impact to the 


unit. 


= While not in Use for Long Periods 
Be sure to disconnect the power cord from the power outlet while not in use for long periods. 
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Cleaning 
Clean the unit with a soft cloth damped with water or cleanser. Do not clean the unit with 


volatile liquid, such as benzine and thinner, or apply an insecticide. This could cause the case to 


discolour or the unit to malfunction. 


Location 
Do not locate the unit under extremely high or low temperature or under great charges in 
humidity. The unit should also be away from vibration and dust. Nothing should be on top of 
it. 


Operation and Maintenance 
Do not use or store the unit with the cabinet opened or with the top cover removed. This could 


cause an electric shock or malfunction of the unit. 


Noise Wave 
If the unit is used near a radio or TV, its operation may adversely interfere with the radio or TV. 


In addition, the unit may receive influences from sources generating strong magnetic forces like 


a TV. Therefore, be|sure to use the unit 2 to 3 meters away from such sources. 


Power ON/OFF 


ON/OFF operation of the power switch should be conducted at an interval of 10 seconds or 
more. This is to ensure operation of the built-in microcomputer. 


Cassette Handling 
lf stained, the recording and playback heads inside the cassette tape recorder make it impossible 


to record and reproduce correct data. 
It is recommended that the unit be cleaned once a month. Cleaning tape available on the market 


will be convenient. When the tape is not run, be sure to press the stop button. 


